procedure TForm1.Button1Click(Sender: TObject); begin Button1.Hint := 'This is my hint' + #13#10 + 'with two lines'; end;
email: delphi4all@narod.ru
Делать переносы строк |
ОГЛАВЛЕНИЕ HOME MAIL |
В большинстве случаев конец строки задается последовательностью из двух символов - с кодами 13 и 10. Эта программа создает всплывающую подсказку (Hint) с переносом.procedure TForm1.Button1Click(Sender: TObject); begin Button1.Hint := 'This is my hint' + #13#10 + 'with two lines'; end; email: delphi4all@narod.ru | |