|
µ¨¸¶´ç °ø½Ä ÀºÇà°èÁ |
ÇϳªÀºÇà 227-910235-83607 |
¿¹±ÝÁÖ ÀÌ»ó±¹(¿î¿µÁø) |
|
|
|
|
|
|
|
|
|
|
°ÁÂ, ÆÁ, Á¤º¸ |
°ÁÂ, ÆÁ, Á¤º¸ ÀÔ´Ï´Ù. |
|
|
|
ListBox ¸®½ºÆ®¹Ú½º Ä÷³ Ãß°¡Çϱâ |
¾È¶°´Ï
(ÀÌ´ÉÈÆ)
2016-11-29 ¿ÀÀü 12:56:12
Ä«Å×°í¸®:
ÆÁ
2710ȸ Á¶È¸
÷ºÎÆÄÀÏ ´Ù¿î·Îµå
Delphi.TListBox.Add.new.column.png
|
|
|
¿À·£¸¸¿¡ °³ÀÎÀûÀÎ Æí¸® ¿ëµµ·Î À¯Æ¿À» ÀÛ¼ºÇÏ´Ù°¡ ÇÊ¿äÇØÁø..
TListBox ¿¡ Ä÷³À» Ãß°¡ÇÏ´Â ¹æ¹ýÀÔ´Ï´Ù.
Ãâó:
http://www.swissdelphicenter.ch/en/showcode.php?id=580
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 hinzufügen.} Listbox1.Items.Add('Peter' + Tab + 'Meier' + Tab + '1234-56' + Tab + 'Otzlingen'); Listbox1.Items.Add('Johann Jones' + Tab + 'Krauter' + Tab + '123-45'); end;
|
|
|
|
|
|
|
|
|