Registriert seit: 4. Jan 2003
Ort: Sachsen
573 Beiträge
Delphi 5 Professional
|
Re: DBGrid mit DBComboBox
4. Nov 2003, 23:57
Hallo SvenT,
Delphi-Quellcode:
// PickList mit PosArt zur Auswahl in tsPos erzeugen
UP_DBActiv(Tab3, SessN, DataPath, fnPosArt);
Tab3.IndexName := ixKurz;
dbg32.Columns.Items[0].PickList.Clear;
Tab3.First;
while not Tab3.Eof do begin
s := copy(Tab3.FieldByName('Kurz').AsString + ' ', 1, 6)
+ Tab3.FieldByName('Lang').AsString;
dbg32.Columns.Items[0].PickList.Add(s);
Tab3.Next;
end;
// Anzahl der Auswahlfelder untereinander um ScrollBar zu verhindern
dbg32.Columns.Items[0].DropDownRows := Tab3.RecordCount;
Tab3.Close;
Bild als Anlage beigefügt.
mfg
eddy
[edit=Daniel B]Delphi-Tags korrigiert. Mfg, Daniel B[/edit]
|
|
Zitat
|