小弟想要將一個字串的內容傳給一個類別 如 procedure TForm1.DBGrid1CellClick(Column: TColumn); var s :string; clo :TColumn; begin s:='button1'; 我要如何把s字串的內容傳給colㄋ?? end; 還是不能這樣做?? 請各位前輩幫忙

型態不同當然是無法assign 看不出你到底想做什麼, 如果是想改變column Title之顯示倒是可以如下    procedure TForm1.DBGrid1CellClick(Column: TColumn); var    s   :string;    clo :TColumn; begin    s:='button1';    column.title.caption:=s; end; 還是不能這樣做?? 請各位前輩幫忙 [/quote]

引言: 型態不同當然是無法assign 看不出你到底想做什麼, 如果是想改變column Title之顯示倒是可以如下 procedure TForm1.DBGrid1CellClick(Column: TColumn); var s :string; clo :TColumn; begin s:='button1'; 我是想呼叫某個procedure1(Sender: TObject); procedure1(clo); 我的procedure1的sender會引用到button1的元件名稱; 我想應該也是無法做到吧?? 我另外寫了一個procedure2把傳入的變數改成string了， 不過重複的code就會多一段``` 感謝前輩指導```` end; 還是不能這樣做?? 請各位前輩幫忙

[/quote]

Hello yabula 兄您好: 請問您是要改Grid裡面的值嗎?? 若是的話直接對TField做動作 Column.Field.AsString := 'abc';

------


我不是高手, 高手是正在銀幕前微笑的人.

[quote] Hello yabula 兄您好: 請問您是要改Grid裡面的值嗎?? 若是的話直接對TField做動作 Column.Field.AsString := 'abc'; 不是```感謝前輩好意``` 我只是要引用到另一個procedure， 不過那個procedure需傳入的是個(Sender: TObject); 雖然我已找到替代方法，不過還是看看各位前輩有何辦法吧```

引言: 不是```感謝前輩好意``` 我只是要引用到另一個procedure， 不過那個procedure需傳入的是個(Sender: TObject); 雖然我已找到替代方法，不過還是看看各位前輩有何辦法吧``` < face="Verdana, Arial, Helvetica"> 這很多人問過了，只是你問的和別人不一樣！ 看有沒有猜錯procedure1(FindComponent('Button1')); 不然多一個參數也可以。

人生有夢，逐夢而行。 人若為善，福雖未至，禍已遠離。 人若為惡，禍雖未至，福已遠離。 http://www.taconet.com.tw/jieshu/

這很多人問過了，只是你問的和別人不一樣！ 看有沒有猜錯procedure1(FindComponent('Button1')); 不然多一個參數也可以。[/green]    小弟初學，比較不懂如何去問```` 感謝前輩指導````已經可以了````