Morfik, огромное спасибо!!!! Все работает!
Теперь вопрос в догонку, а как этот текст можно менять при нажатии на горячии кнопки (как отлавливать их нажатие я знаю). Как сам текст менять?
Morfik, огромное спасибо!!!! Все работает!
Теперь вопрос в догонку, а как этот текст можно менять при нажатии на горячии кнопки (как отлавливать их нажатие я знаю). Как сам текст менять?
Код:
g_Font.DrawTextA(nil,PChar('Привет мир'),-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff));
ну дак вместо 'Привет мир' пихаеш туда переменную типа string а своими горячими клавишами меняеш ей значение
Блин, мне реально уже стыдно спрашивать, извините за мою тупость, но где в библиотеки написать процедуру отлова клавишь и как. С формой то все понятно, там событие по таймеры происхдило. А тут когда оно должно происходить?
Все для горячей клавиши дошло как сделать:
Код:
if getasynckeystate($70)<>0 then
begin
TextRect := Rect(300,300,300,300);
g_Font.DrawTextA(nil,PChar('Работает'),-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff));
Result:=EndScene9Next(self);
end
else
begin
TextRect := Rect(300,300,300,300);
g_Font.DrawTextA(nil,PChar('Привет мир'),-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff));
Result:=EndScene9Next(self);
end;
А как сделать чтобы бралось слово из Edit который на форме, например:
Код:
g_Font.DrawTextA(nil,PChar(Edit1.Text),-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff));
и второй вопрос, можно ли вместе с текстом вывести картинку маленькую или хотя бы фон у текста сделать например черным?
Спасибо
Последний раз редактировалось carliker, 09.02.2011 в 16:30.