DBLookupCombobox都是lookup兩個表的,如何實現lookup一個表???(100分)

  • 主题发起人 主题发起人 bluedog
  • 开始时间 开始时间
B

bluedog

Unregistered / Unconfirmed
GUEST, unregistred user!
DBLookupCombobox都是lookup兩個表的,如何實現lookup一個表???
比如:你的某個表有empid這個字段,那麽可以很容易地lookup emp表來實現combobox
下拉時顯示empid empname , 但是我要是僅僅想顯示emp這張表的内容,下拉時顯示
empid empname都是從emp來,也就是lookup一張表,怎麽做???
類似于DBLookUpCombobox的控件都是lookup兩張表的,怎麽做lookup一張表??
 
無人反映??
我目前是以一個普通的combobox帶替,自己添加兩個字段:
把兩個字段加到一個combobox中並對齊:
比如加入數據集的ID, Name到combobox中,假設ID的長度為10,那麽以10來對齊:
procedure AddToCombobox;
var
tempstr: string;
Loop,I: Integer;
begin
while not Query.Eof do
begin
tempstr:= Trim(Query.FieldByName('ID').AsString);
Loop := 10 - length(tempstr);
if Loop > 0 then
for I:=1 to Loop do
tempstr:= tempstr+ ' ' ; //加的是空格
comobobx1.items.add(tempstr + ' '+ Query.FieldByName('Name').AsString);
Query.Next;
end;
Combobox1.itemindex:=0;
end;

判斷選擇了那個ID:
ID:= trim(copy(Combobox.text,0,10));
 
后退
顶部