Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Теоретические вопросы _ как вывести знач. переменной в графическом режиме

Автор: AeRo 29.03.2004 22:54

люди, как можно вывести значение переменной в графическом режиме в определённом месте. насколько я знаю Outtext или OutTextXY не могут их выводить, тогда как????????

Автор: SKVOZNJAK 29.03.2004 23:04

Векторными шрифтами smile.gif Если нужен большой пребольшоооой исходник smile.gif Заходи на мой сайт - СТЭК\СУШНЯК ТУРБО

Автор: Guest 29.03.2004 23:10

мне нужно вывести в графическом режиме примерно следующее
write('текст1' ,a[1], 'текст2'); -(это не для граф. режима!!!) ,только с заданием координат на поле. это вообще возможно???????

Автор: trminator 29.03.2004 23:48

Преобразуй число в строку. Насколько я помню, OutTextXY выводит только строки. Процедура val пригодится.

Автор: Altair 30.03.2004 12:56

Вот посмотрите, что сделал я (только не смейтесь, для моих целей то, чтго надо)
Мне необходимо было выводить в граф. реж. цифры( от 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 31.03.2004 0:37

Цитата
от 0 до 256 -т.е максимум двухзначные

Вот настоящий программер =) Думает в 16-ричной системе счисления =)

Автор: Altair 31.03.2004 11:45

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

Есть еще стандарнтые пропроцедуры явного преобразования:
ORD, CHR, STR, VAL, TRUNC, ROUND, PTR и т.д. (см. HELP по паскалю)

Автор: trminator 31.03.2004 23:50

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

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

Автор: Altair 1.04.2004 9:08

Всегда готов помочь.

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