各位大大早 在DBLookupComboBox的Object Inspector中沒有Text屬性 我想在Form一起來的時候就先給DBLookupComboBox.Text := '請選擇' 請問我該如何下這個指令呢？ 感謝

引言: 各位大大早 在DBLookupComboBox的Object Inspector中沒有Text屬性 我想在Form一起來的時候就先給DBLookupComboBox.Text := '請選擇' 請問我該如何下這個指令呢？ 感謝 < face="Verdana, Arial, Helvetica"> 這可能無法預設, 因為 lookup 是關聯兩個資料庫, 但這並不是無解, 你可能用其他元件來代替 "請選擇" 的訊息!

Hi,chateau_frank, DBLookupComboBox有Text属性，但它是ReadOnly的。 建议： (code) DBlookupComboBox1.showhint:=true; DBlookupComboBox1.hint:='请选择'; (/code) 或是直接在DBLookupComBobox旁加个Label元件写上"请选择"即可。

type
  TDBLookupComboBox = Class(DBCtrls.TDBLookupComboBox)
  protected
    procedure Paint; override;
  end;
  TForm1 = Class.....
  ....    procedure TDBLookupComboBox.Paint;
begin
  inherited Paint;
  if Text='' then
  begin
    Canvas.TextOut(2,2,'請選擇 ....');
  end;
end;

自己畫比較快。以上僅提供參考 ～～～～～～～～～～～ 難得聰明，常常糊塗。 ～～～～～～～～～～～

感謝P.D.大大的告知，也感謝WANG兄的指導。 我了解了，也按照WANG兄的方式來替代TEXT屬性了。