
10.02.2011, 14:40
|
Прохожий
|
|
Регистрация: 10.02.2011
Сообщения: 4
Репутация: 10
|
|
В библиотеке есть функция, она постоянно вызывается. Мне надо получить примерно такое: (см. DrawTextA то что курсивом)
Код:
unction EndScene9Callback(self: pointer): HResult; stdcall;
var
TextRect: TRect;
color:TD3DColor;
begin
TextRect := Rect(300,300,300,300);
g_Font.DrawTextA(nil,PChar(From1.Edit1.Text),-1, @TextRect,DT_LEFT or DT_NOCLIP,D3DCOLOR_RGBA($ff, $00, $00, $ff));
Result:=EndScene9Next(self);
end;
|