Помощь - Поиск - Пользователи - Календарь
Полная версия: как вывести знач. переменной в графическом режиме
Форум «Всё о Паскале» > Pascal, Object Pascal > Теоретические вопросы
AeRo
люди, как можно вывести значение переменной в графическом режиме в определённом месте. насколько я знаю Outtext или OutTextXY не могут их выводить, тогда как????????
SKVOZNJAK
Векторными шрифтами smile.gif Если нужен большой пребольшоооой исходник smile.gif Заходи на мой сайт - СТЭК\СУШНЯК ТУРБО
Guest
мне нужно вывести в графическом режиме примерно следующее
write('текст1' ,a[1], 'текст2'); -(это не для граф. режима!!!) ,только с заданием координат на поле. это вообще возможно???????
trminator
Преобразуй число в строку. Насколько я помню, OutTextXY выводит только строки. Процедура val пригодится.
Altair
Вот посмотрите, что сделал я (только не смейтесь, для моих целей то, чтго надо)
Мне необходимо было выводить в граф. реж. цифры( от 0 до 256 -т.е максимум двухзначные)
Вот процедура:

Код

Procedure Buf_Str(CH:integer; var s1:string);
var
m,n,o:integer;
begin
s1:='';
If CH<1000 then
begin
n:=CH div 100;
s1:=s1+CHR(48+n)
end;
m:=(ch div 10) - n*100;
s1:=s1+CHR(48+m);
o:=ch-(n*100+m*10);
s1:=s1+CHR(48+o);
end;

Здесь CH -число которое записывается в строку S1
Т.е это под конкретную задачу.
trminator
Цитата
от 0 до 256 -т.е максимум двухзначные

Вот настоящий программер =) Думает в 16-ричной системе счисления =)
Altair
Я сегодня посмотрел Фаронова - есть специальная процедура
STR(X,ST) - она преобразует чисто X любого типа в строку ST !!!!!!
А мы мучались!
Так, что если надо вывести в гр.реж. переменную, то делает
так:
{------}
Str(perem,stroka);
OutTextXY(X,Y,stroka);
{-------}

Есть еще стандарнтые пропроцедуры явного преобразования:
ORD, CHR, STR, VAL, TRUNC, ROUND, PTR и т.д. (см. HELP по паскалю)
trminator
Цитата(trminator @ 29.03.04 16:48)
Преобразуй число в строку. Насколько я помню, OutTextXY выводит только строки. Процедура val пригодится.

Как всегда все перепутал. В этот раз -- val с str =| Oleg_Z, спасибо =)
Altair
Всегда готов помочь.

Кстати преобразование типов - интересная штука.
Оказывается можно в описании переменных указать адрес, где она будет храниться, и что самое интересное, можно указать так:
------
VAR
a:array[1..2] of byte;
b: word ABSOLUTE a;
C:integer ABSOLUTE a;
------
таким образом, можно расматриватть массив как слово, или как еще.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.