各位先進大家好 小弟是一位剛踏入Delphi的菜鳥..
目前遇到一個問題有點疑惑 有關於按鈕共用事件的寫法差異
Edit1.color與 Tedit(Sender)還有(Sender AS Tedit程式1---------------------------------------------------
begin
Edit1.Font.Color :=clWhite;
procedure TForm1.Edit1Exit(Sender: TObject);
Edit1.Color :=clWhite;
end;
procedure TForm1.Edit2Enter(Sender: TObject);
Edit2.color :=clRed;
end;

begin
Edit2.Font.Color :=clBlack;
程式2-----------------------------------------------------
begin
Tedit(Sender).Font.Color :=clWhite;
procedure TForm1.Edit1Exit(Sender: TObject);
Tedit(Sender).Color :=clWhite;
end;

1.
在Form OnCreate時先把兩個Edit事件寫成一樣
Edit1.OnEnter := Edit1Enter;
Edit1.OnExit := Edit1Exit;
Edit2.OnEnter := Edit1Enter;
Edit2.OnExit := Edit1Exit;
或者到Object Inspector把每個Edit的Event改成一樣的事件
2.
TEdit(Sender)跟(Sender as TEdit)都是一樣的
共用同樣的事件後以Edit1Enter舉例，當其中一個Edit進入到Edit1Enter後Edit會指到Sender
Edit1.Color只是對Edit1做處理，而TEdit(Sender).Color是針對某個Edit觸發這個事件後對它做處理

編輯記錄

Sender是否可以理解為某個物件執行參數呢? 例如我要動用到所有的TEdit做一樣的動作 那我只要針對TEdit(Sender)寫方法就好 這樣對嗎?
===================引 用 andy424345 文 章===================
1.
在Form OnCreate時先把兩個Edit事件寫成一樣
Edit1.OnEnter := Edit1Enter;
Edit1.OnExit := Edit1Exit;
Edit2.OnEnter := Edit1Enter;
Edit2.OnExit := Edit1Exit;
或者到Object Inspector把每個Edit的Event改成一樣的事件
2.
TEdit(Sender)跟(Sender as TEdit)都是一樣的
共用同樣的事件後以Edit1Enter舉例，當其中一個Edit進入到Edit1Enter後Edit會指到Sender
Edit1.Color只是對Edit1做處理，而TEdit(Sender).Color是針對某個Edit觸發這個事件後對它做處理