Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Направление текста [D7, Win2k]


Ale ©   (2004-08-13 13:42:00) 

Добрый день мастера!
Подскажите, как изменить направление текста в 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:00) [1]

А кто Sender?


Наверх

Титульная страница Поиск, карта сайта Написать письмо