Вот код программы
uses WinGraph,wincrt;
var Gd : integer;
Gm : integer;
pal : PaletteType;
st : string[26];
sk : string[26];
procedure The_End(x,y,k,koo:longint);
begin
setColor(k);
rectangle(x+33*koo-11,y-10,x+33*(koo+length(st))+7,y+39);
rectangle ...
Найдено 2 результата
Кирилица
Можно ли в fpc-2.2.2.i386-win32 выводить кирилицу? у меня в коде
Word(x,y);
lp:='А';
lk:='Я';
вместо русского алфавиту выводит иероглифы
Word(x,y);
lp:='А';
lk:='Я';
вместо русского алфавиту выводит иероглифы