скрыть

скрыть

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Google  
 

Колонки разной ширины в TListBox при помощи табулятора



Оформил: DeeCo

procedure TForm1.Button1Click(Sender: TObject);
 const
   // The maximum number of Tabs 
  // Die Anzahl der maximal aufretenen Tabs eintragen 
  MAX_TABS = 4;
   Tab = #9;
 var
   Tabulators: array[0..MAX_TABS] of Integer;
 begin
   { Set the Tabulator Widths / Tabulatorweiten festlegen}
   Tabulators[0] := 70;
   Tabulators[1] := 120;
   Tabulators[2] := 100;
   Tabulators[3] := 80;
   Listbox1.TabWidth := 1;
   { Set the Tabulators / Tabulatoren setzen }
   SendMessage(ListBox1.Handle, LB_SETTABSTOPS, MAX_TABS, Longint(@Tabulators));
   { Add some Items / Items hinzufugen.}
   Listbox1.Items.Add('Peter' + Tab + 'Meier' + Tab + '1234-56' + Tab + 'Otzlingen');
   Listbox1.Items.Add('Johann Jones' + Tab + 'Krauter' + Tab + '123-45');
 end;





Copyright © 2004-2019 "Delphi Sources". Delphi World FAQ


Clever Internet Suite

Интернет-компоненты Clever Internet Suite — набор компонентов для Delphi/C++Builder, позволяющих реализовать обмен данными по сети в вашем приложении. С помощью Clever Internet Suite вы можете реализовать различные функции для работы в сети интернет: скачивание файлов, отправка данных, введенных пользователем, рассылка и получение почты, использовать клиенты HTTP, FTP, SMTP, POP3, IMAP и NNTP; серверы SMTP, POP3, IMAP и FTP и многое другое.



Группа ВКонтакте   Facebook   Ссылка на Twitter