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

Вниз

Направление текста   Найти похожие ветки 

← →
Ale ©   (2004-08-13 13:42) [0]

Добрый день мастера!
Подскажите, как изменить направление текста в TStatictext. Делаю так...

procedure TTorm1.VertTextExecute(Sender: TObject);
var
 LogRec: TLOGFONT;
begin
 if Sender is TStaticText then
 begin
   ...
   GetObject(TStaticText(Sender).Font.Handle,SizeOf(LogRec),Addr(LogRec));
   LogRec.lfEscapement:= 900;
   TStaticText(Sender).Font.Handle:= CreateFontIndirect(LogRec);
 end;
end;
но направление не меняеися. Где ошибка?

---

← →
REA ©   (2004-08-13 15:04) [1]

А кто Sender?

---

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

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

Наверх

Память: 0.46 MB
Время: 0.041 c