slexas

Nu ta prasme is masyvo issitraukiu tarkim spalva 'white' ir noriu padaryt kad tokios spalvos butu fonas... tai kaip butu galima tai padaryt nes man kazko meta klaida jei rasau vietoj spalvos kintamaji.

Aciu, dar pora klausimu, jei as is txt issitraukiu koki skaiciu pvz 7 ir noriu padaryt kad pagal tai koks skaicius man roditu fono spalva, bet jei rasau ta kur issitraukiu kaip fono spalva man rodo klaida.. tai ar taip neimanoma padaryt ar kazka netaip darau?? ir kaip istraukt random eilute is failo ;]

viskas veikia ;] db tam faile yra daug zodziu is naujos eilutes... tai kaip man butu galima juos issirinkt po viena skirtingam dalykam ? gal kas gali padet :(

google naudojaus.. bet nlb kur parasyta kaip atvaizduot kas parasyta faile... ten tik visur rasymas, perrasymas... nu as darau sitaip... program antra; var s: string; ls: text; begin Assign(ls,'antra.txt'); Reset(ls); while not eof(ls) do Readln(ls,s); writeln(s); close(ls); end.

Mokausi fps, db pradejau mokintis su failais... ir kai nuskaitau su assign txt faila padarau reset bandau ji atvaizduot su writeln(); ir kazkodel nieko neparodo... gal kas gali paaiskint kdl nk nerodo? o gal reik kazkaip kitaip is failo atvaizduot ;]