DELPHI/Часто задаваемые вопросы и ответы на них/Компоненты



На главную

Подписка

Новости

Главная / DELPHI / Часто задаваемые вопросы и ответы на них / Компоненты / Кнопка с многострочным заголовком

Кнопка с многострочным заголовком
procedure TForm1.Button1Click(Sender: TObject); 
var 
  i: Integer; 
begin 
  i := GetWindowLong(Button1.Handle, GWL_STYLE); 
  SetWindowLong(Button1.Handle, GWL_STYLE, i or BS_MULTILINE); 
  Button1.Caption := 'Delphi World - ' + #13#10 + 'лучше не бывает!';
end;
Copyright © "DELPHI WORLD" E-mail: delphiworld@mail.ru http://www.delphiworld.narod.ru

Источник получения информации: http://www.delphiworld.narod.ru