 | | |
 | Stránka: 1 z 1
| [ Príspevkov: 3 ] | |
| Autor | Správa |
|---|
Registrovaný: 14.06.07
Prihlásený: 27.12.11
Príspevky: 72
Témy: 13 |  Napísal chiwo: 20.10.2008 19:04 | |
|
3. úloha:
Napíšte program, ktorý načíta textový súbor kresli.txt ( http://mitinkas.googlepages.com/kresli.txt). Súbor obsahuje riadky s troma číslami - poradové číslo, x-ová súradnica a y-ová súradnica. Po prečítaní riadku nakreslite na grafickej ploche bod na súradniciach x, y a vypíšte pri ňom aj jeho poradové číslo. Môžete predpokladať, že súbor je korektne zadaný.
Kód: uses RobotUnit;
procedure TForm2.Button1Click(Sender: TObject);
var textak: TextFile;
r: TRobot;
vypis: string;
poradie, x, y:integer;
begin
AssignFile(textak, 'kresli.txt');
Reset(textak);
r:= TRobot.Create;
r.PW:=5;
while not SeekEof(textak) do
begin
read(textak, poradie, x, y);
r.movexy(x,y);
r.point;
{vypis:=IntToSTr(poradie);}
r.text('5');
end;
CloseFile(textak);
end;
namiesto 5-ky mi vypisuje take cierne obdlznicky a neviem preco aj som pozeral RobotUnit(najdete v 2.predáške na www.delphi.input.sk) a ma to byt string Skusal som s tym robit hocico ale stale su tam tie stvorceky Ak vie niekdo podarit tak budem velmi vdacny
|
|
Registrovaný: 19.09.06
Prihlásený: 21.04.24
Príspevky: 749
Témy: 31
Bydlisko: Ružomberok&... |
zrejme je to sposobene r.PW=5 a r.point. skus dat r.PW=2 a namiesto r.point dat r.fd(2)
|
|
Registrovaný: 14.06.07
Prihlásený: 27.12.11
Príspevky: 72
Témy: 13 | Napísal autor témy chiwo: 21.10.2008 19:06 | |
|
ok uz to ide to pw nebol problem lebo pw som mal aj jedna a stale to robilo blbosti tak som si nadstavil takto a ide to v poho
Kód:
r.pw:=5;
r.fd(1);
r.pw:=1;
vypis:=IntToSTr(poradie);
r.text(vypis);
|
|
| Stránka: 1 z 1
| [ Príspevkov: 3 ] | |
Podobné témy | | Témy | Odpovede | Zobrazenia | Posledný príspevok |
|---|
 | Problem s vypisom pri strankovani v PHP, ASP | 12 | 577 | 02.06.2008 13:26 lostwarrior  |  | PHP,MySQL problem s vypisom v PHP, ASP | 7 | 494 | 18.05.2010 17:10 Ecko | | Problem s vypisom zo suboru C v Assembler, C, C++, Pascal, Java | 4 | 358 | 01.04.2012 12:47 gaspa10 | | Vkladanie textu cez button v JavaScript, VBScript, Ajax | 2 | 395 | 14.11.2011 11:48 Tomasko19 | | Uloha - Tien textu cez CSS, minimalisticke riesenie v HTML, XHTML, XML, CSS | 20 | 1002 | 04.12.2007 14:48 chrono | | notebook robota v Notebooky a netbooky | 6 | 472 | 22.11.2018 19:55 bubly_fuk | | Zmena textu a zanechani pozice v textu v PHP, ASP | 4 | 755 | 01.08.2009 21:26 Tominator | | Schéma: Generátor hlasu robota v Elektronika | 0 | 1283 | 23.01.2007 6:07 Elektronic | | pomoc s vypisom z databázy v PHP, ASP | 2 | 376 | 29.03.2009 15:05 stenley | | Pomoc s PHP vypisom MySQL databazy v PHP, ASP | 8 | 1028 | 14.05.2008 14:55 eMPiko | | Ako sa zbavit banu od Google robota? v Služby a webstránky | 0 | 331 | 25.07.2013 10:17 capricorn7 | | H: NOTEBOOK STUDENT,ROBOTA,ZABAVA POMENEJ, CO POVIETE? v Notebooky a netbooky | 29 | 1122 | 14.10.2007 10:21 teki | | Detailné video strašidelného ale pôsobivého dvojkolesového robota od Google v Novinky | 10 | 699 | 01.03.2017 10:40 MTK | | Problem s kodovanim textu v HTML, XHTML, XML, CSS | 4 | 604 | 12.02.2011 18:23 Logik | | Problem s načítanim textu vo FF v Ostatné programy | 1 | 176 | 23.01.2014 20:23 mirom | | Office word/excel problem s formatovanim textu v Ostatné programy | 0 | 672 | 04.10.2014 15:04 Jerenko |
| Nemôžete zakladať nové témy v tomto fóre
Nemôžete odpovedať na témy v tomto fóre
Nemôžete upravovať svoje príspevky v tomto fóre
Nemôžete mazať svoje príspevky v tomto fóre
|
|
