Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2005.10.16;
Скачать: [xml.tar.bz2];

Вниз

Написать на Canvas   Найти похожие ветки 

 
Knop ©   (2005-08-15 15:51) [0]

Как можно вывести на Canvas экрана слово из lebel или edit?


 
Eraser ©   (2005-08-15 15:55) [1]

Knop ©   (15.08.05 15:51)

Можно, и не только из label или edit.
См. свойство Handle у TCanvas.


 
Knop ©   (2005-08-15 15:59) [2]

Например?


 
alex-drob ©   (2005-08-15 16:05) [3]

DrawText


 
Knop ©   (2005-08-15 16:48) [4]

Спасибо. Вроде разобрался. Использовал TextOut


 
Eraser ©   (2005-08-15 16:58) [5]

Knop ©   (15.08.05 16:48) [4]

Не забывай контекст потом осободить.


 
Knop ©   (2005-08-16 11:52) [6]


> Не забывай контекст потом осободить.

Как?

И ещё возник вопрос: Форма развёрнута на весь экран. В центре формы надо вывести надпись. Пишу TextOut(Screen.Width div 2, Screen.Height div 2, "Текст"), но так задаются координаты верхнего левого угла. Как можно узнать "длину" текста, чтобы потом внести поправки в координаты. Или можно другую процедуру (если есть) с примерчиком желательно.


 
Eraser ©   (2005-08-16 14:38) [7]

Knop ©   (16.08.05 11:52) [6]
> Не забывай контекст потом осободить.

Как?


Перед вызовом Canvas.Free, впиши ReleaseDC(0, Canvas.Handle);

Как можно узнать "длину" текста, чтобы потом внести поправки в координаты.

TCanvas.TextWidth(const Text: string): Integer;
___
А вообще справка по Делфи - весч хорошая...


 
Knop ©   (2005-08-16 15:09) [8]


> Перед вызовом Canvas.Free, впиши ReleaseDC(0, Canvas.Handle);

У меня вызывается из главного окна форма, на которой всё дело и происходит (рисование), потом форма уничтожается FreeAndNil. Стоит ли делать как вы указали

> А вообще справка по Делфи - весч хорошая...

Знать бы как по английски сформулировать запрос нормально



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

Форум: "WinAPI";
Текущий архив: 2005.10.16;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.46 MB
Время: 0.039 c
14-1127455888
Hellion
2005-09-23 10:11
2005.10.16
Delphi 2005


5-1101362935
diabolik_krsk
2004-11-25 09:08
2005.10.16
Помогите с наследником DBGrid


2-1126710094
Anfaenger
2005-09-14 19:01
2005.10.16
Function


14-1127400606
Джо
2005-09-22 18:50
2005.10.16
Мирная тема.


6-1119475580
pool
2005-06-23 01:26
2005.10.16
WebServer





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский