JA nu tomeer noder :)
http://pascal.sources.ru/tmt/doc/graph.htm#top

tāpēc jau es saku, ka PASCAL ir slikts..

(Reply to this) (Parent) (Thread)

uses graph,crt;
var color,i,x,y,x1,y1,stars,gd,gm:integer;
key:char;
s:string;
begin
gd:=detect;
initgraph(gd,gm,'c:\bp\bgi\');
if graphresult<>0 then
begin
writeln('grafiku neizdevas palaist');
readln;
halt;
end;
{sataisam paletes}
setrgbpalette(6,0,0,63);
setcolor(6);
circle(50,50,30);
repeat until keypressed;
end.

(Reply to this) (Parent) (Thread)

nu, redz kā - PASCAL nestrādā konsekventi.. lai gan - Tu freepascal mēģini?

es parastajā taisu..

(Reply to this) (Parent) (Thread)

freepascal'am nav cita funkcionalitāte, ko man vajag.

(Reply to this) (Parent) (Thread)

konkrētajā gadījumā - nemaina krāsas uz ekrāna, nomainot paleti.

vēl viņam ir savi gļuki.

(Reply to this) (Parent) (Thread)

*atkal*? tātad mans kods PASCAL bija nepareizs? tas ar to apli, ja? :P
turklāt - ne es vienīgā tādu problēmu esmu novērojusi.. un ir jau atrasts workarounds :P bet Tev jau liksies, ka TU vienīgais kaut ko zini un saproti un ka Tev ir bezgala lielā taisnība, ja?

ai, kāda starpība, ko Tu domā..

(Reply to this) (Parent)

nevis ignorēt manas kļūdas un nolasīt manas domas, bet strādāt loģiski :P

(Reply to this) (Parent) (Thread)

1. starp citu, nez kāpēc citur tas strādā :P
2. nu, ja, protams. viss ir ideāli, tikai es nez ko esmu sačakarējusi.. vai ne :P

(Reply to this) (Parent) (Thread)

klau, atzīsti tak vienreiz, ka pascal'ā ir gļuki. un ne viens vien.. ok, daļa no tiem ir apejami.. bet ir gļuki.. un neattaisno to ar vecumu,ok? ;P

(Reply to this) (Parent) (Thread)

jā, bet freepascal'ā savukārt ir citi gļuki.

un tie (vismaz otrais ar paleti) toč ir gļuki :P

(Reply to this) (Parent)

un kā Tu to gļuku ar paleti loģiski izskaidrosi?

(Reply to this) (Parent) (Thread)

hahha. :))
personibas daliishanaas? bet, ja jau paliidz...

(Reply to this) (Parent) (Thread)

nav gan personības dalīšanās :P vienkārši cilvēks visus savus ierakstus izdzēsa :P

(Reply to this) (Parent)