Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.07.31;
Скачать: CL | DM;

Вниз

DrawText   Найти похожие ветки 

 
McSimm2   (2003-07-17 15:46) [0]

как с помощью сабжа вывести число ? Или какая нибудь функция апишная есть ??

Текст выводится через

n:Pchar
N := pchar("М");
DrawText(FDC, @N, -1, R, DT_CENTER or DT_VCENTER or DT_SINGLELINE);

а вот если N = 2 Ю то выводится не правильно...


 
Digitman ©   (2003-07-17 15:53) [1]


> как с помощью сабжа вывести число


никак. только - строку символов, ограниченную терминатором.

а вот что за символы в строке и как они там появятся перед вызовом DrawText() - решать тебе. Например, перед вызовом DrawText() используй процедуру Str() для форматного преобразования целочисленного значения N в его строковое представление


 
McSimm2   (2003-07-17 15:57) [2]

str() нужно подключать System, эт не джопустимо.
С таким же успехом можно и
string := Format("%d",int);

А как только с пом api ??


 
Юрий Зотов ©   (2003-07-17 16:04) [3]

> McSimm2 (17.07.03 15:57)

> str() нужно подключать System, эт не джопустимо.

Знаете, а System все равно всегда подключается, хотите Вы этого, или нет.

С PChar Вы работаете совершенно неверно. Не выделяете память под строку и т.д. Если хотите научиться работать с PChar, освойте указатели и динамическую память. А если хотите просто вывести текст, не заморачивая себе голову лишними знаниями, то сделайте так:
DrawText(FDC, PChar(строка), ...);


 
Anatoly Podgoretsky ©   (2003-07-17 16:04) [4]

McSimm2 (17.07.03 15:57)
Программа написанная на Дельфи не может работать без System


 
Digitman ©   (2003-07-17 16:07) [5]


> McSimm2


он и так уже подключен в любом случае.
даже не смотря на то, что в uses отсутствует.


 
icWasya ©   (2003-07-17 17:24) [6]

>даже не смотря на то, что в uses отсутствует.
более того, если упомянете в uses, то компилятор проругается на повторное использование идентификатора



Страницы: 1 вся ветка

Текущий архив: 2003.07.31;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.014 c
14-100900
Sirus
2003-07-14 08:14
2003.07.31
BIOS не хочет прошиваться...


14-100933
DimaB
2003-07-14 06:04
2003.07.31
Digital Metaphors - ReportBuilder v7.02 Server (Delphi 7)


4-101046
SerVel
2003-05-27 09:03
2003.07.31
CreateThread(...);


1-100713
Calm
2003-07-18 16:40
2003.07.31
Как создать TServiceApplication и нужно ли это делать?


1-100803
HolACost
2003-07-17 12:43
2003.07.31
Как запустить мапированый файл