ورود

View Full Version : سوال: تولید DBCtrlGrid در زمان اجرا



vb.net2008
پنج شنبه 23 تیر 1390, 12:17 عصر
سلام
من یه DBCtrlGrid در زمان اجرا درست می کنم. اما کنترل ها رو فقط توی یه سطر تکرار می کنه. یعنی اطلاعت
ات رو که از جدول می خونه فقط تو یه سطر نشون میده کدمو گذاشتم. میشه مشکلشو بگم.

frmMain.Group2:=TGroupBox.Create(self);
frmMain.Group2.Parent:=frmMain;
frmMain.Group2.Left:=180;
frmMain.Group2.Top:=240;
frmMain.Group2.Width:=650;
frmMain.Group2.Height:=430;
frmMain.DBGrid1:=TDBCtrlGrid.Create(self);
frmMain.DBGrid1.Parent:=frmMain.Group2;
frmMain.DBGrid1.Left:=1;
frmMain.DBGrid1.Top:=10;
frmMain.DBGrid1.Width:=645;
frmMain.DBGrid1.DataSource:=DM.Q1DS ;
frmMain.DBGrid1.PanelHeight:=72;
//frmMain.DBGrid1.PanelBorder:=gbNone;
frmMain.DBGrid1.RowCount:=5;
frmMain.Group:=TGroupBox.Create(self);
frmMain.Group.Parent:=frmMain.d;
frmMain.Group.Left:=5;
frmMain.Group.Top:=6;
frmMain.Group.Width:=620;
frmMain.Group.Height:=50;
frmMain.Lab1:=TLabel.Create(self);
frmMain.Lab1.Parent:=frmMain.Group;
frmMain.Lab1.Left:=580;
frmMain.Lab1.Top:=10;
frmMain.Lab1.Width:=574;
frmMain.Lab1.Height:=10;
frmMain .Lab1.Caption :=':ÚäæÇä';
frmMain.DBTxt1:=TDBText.Create(self);
frmMain.DBTxt1.Parent:=frmMain.Group;
frmMain.DBTxt1.Left:=205;
frmMain.DBTxt1.Top:=10;
frmMain.DBTxt1.Width:=369;
frmMain.DBTxt1.Height:=17;
frmMain.DBTxt1.DataField:='JobName';
frmMain.DBTxt1.DataSource:=DM.Q1DS;
frmMain.DBTxt1.Alignment:=taRightJustify;

vb.net2008
یک شنبه 26 تیر 1390, 19:10 عصر
راه حل شو پیدا کردم

frmMain.Panel:=TPanel.Create(self);
frmMain.Panel:=TPanel(frmMain.DBGridCtrl1.Controls[0]);

vb.net2008
یک شنبه 26 تیر 1390, 19:12 عصر
یه مشکل دیگه وقتی روکوردها رو توی bdgridctrl نشون میده یه سطر خالی خود به خوذ انتهاش اضافه می کنه چی کار کنم که این سطر اضافی خالی نیاد