listbox دو ستونی

[MNosouhi]

با سلام
چطوری می تونم در یک listbox دو ستون داشته باشم، البته میدونم که با ابزارهایی مثل ListView یا کامپوننتهای دیگه میشه این کار رو انجام داد و لی به دلایلی فقط میخام از Listbox استفاده کنم.
برای اینکه در ListBox دو ستون داشته باشم با تغییر خاصیت columns به 2 و تغییر خاصیت Style به lbOwnerDrawFixed و نوشتن کد زیر در رویداد OnDrawItem ، ListBox دو ستونی شد ، اما اصلا کیفیت و زیبایی نداره :


ListBox1.Canvas.TextOut(Rect.Left,Rect.Top,ListBox 1.Items.Strings[index]);
ListBox1.Canvas.TextOut(ListBox1.Left+(ListBox1.Wi dth div 2)+5,Rect.Top,'s33ss')

دوستان راه بهتری سراغ ندارن؟
، البته میدونم که با ابزارهایی مثل ListView یا کامپوننتهای دیگه میشه این کار رو انجام داد و لی به دلایلی فقط میخام از Listbox استفاده کنم.

[mzjahromi]

توی لیست فیلد دو تا فیلد بذارید و بینشون سمی کولن بذارید
البته باز هم کیفیت آنچنانی نخواهد داشت

[SYNDROME]

با سلام

توی لیست فیلد دو تا فیلد بذارید و بینشون سمی کولن بذارید
البته باز هم کیفیت آنچنانی نخواهد داشت
با احترام
در ListBox ما نمی توانیم به DataBase وصل شویم که نام فیلدها را بدهیم.:متفکر:

[www2006]

(اگر اشتباه متوجه منظور شما نشده باشم :)
http://delphi.about.com/cs/adptips2000/a/bltip1200_3.htm

[MNosouhi]

(اگر اشتباه متوجه منظور شما نشده باشم :)
http://delphi.about.com/cs/adptips20...ltip1200_3.htm
راهی که آدرس بالا پیشنهاد داده اینه که Tabwith رو تنظیم کنیم و از کد زیر استفاده کنیم :

begin
ListBox1.Items.Add('First'^I'Second'^I'Third') ;
ListBox1.Items.Add('C1R1'^I'C2R1'^I'C3R1') ;
ListBox1.Items.Add('C1R2'^I'C2R2'^I'C3R2') ;
ListBox1.Items.Add('C1R3'^I'C2R3'^I'C3R3') ;
ListBox1.Items.Add('C1R4'^I'C2R4'^I'C3R4') ;
ListBox1.Items.Add('C1R5'^I'C2R5'^I'C3R5') ;
ListBox1.Items.Add('C1R6'^I'C2R6'^I'C3R6') ;
ListBox1.Items.Add('C1R7'^I'C2R7'^I'C3R7') ;
ListBox1.Items.Add('C1R8'^I'C2R8'^I'C3R8') ;
ListBox1.Items.Add('C1R9'^I'C2R9'^I'C3R9') ;
end;

اما مشکل اینجاست که اگر طول آیتم هایی که قراره در ستون ها قرار بگیره متفاوت باشه ، نظم ستون ها به هم می خوره و در واقع ستونی وجود نخواهد داشت.

[mzjahromi]

توی لیست فیلد دو تا فیلد بذارید و بینشون سمی کولن بذارید
البته باز هم کیفیت آنچنانی نخواهد داشت

ببخشید
با DBLookupListBox اشتباه گرفتم