A
antic_ant
Unregistered / Unconfirmed
GUEST, unregistred user!
Up
M
ml.guo
Unregistered / Unconfirmed
GUEST, unregistred user!
this 代表建立的窗口吧。
L
liaoqianlin
Unregistered / Unconfirmed
GUEST, unregistred user!
没有用Delphi写过.net的东东，不知道，帮你UP
C
celeries
Unregistered / Unconfirmed
GUEST, unregistred user!
this 如果在 delphi 中，相当于 main form 的name
S
shenloqi
Unregistered / Unconfirmed
GUEST, unregistred user!
在Delphi.Net中
type
TForm1 = class (TForm)
Edit1: TEdit;
Button1: TButton;
protected
procedure Button1Click(Sender: TObject;
Args: TEventArgs);
public
constructor Create;
end;
{...}
procedure TForm1.Button1Click(Sender: TObject;
Args: TEventArgs);
begin
MessageBox.Show('您输入的是'#$A#$D + Edit1.Text , '测试');
end;
constructor TForm1.Create;
begin
{...}
with Button1do
begin
Name := 'Button1';
Top := 10;
Left := 130;
Width := 70;
Height := 28;
Text := 'Show!';
add_Click( Button1Click );
//增加事件
end;
{...}
end;
type
TForm1 = class (TForm)
Edit1: TEdit;
Button1: TButton;
protected
procedure Button1Click(Sender: TObject;
Args: TEventArgs);
public
constructor Create;
end;
{...}
procedure TForm1.Button1Click(Sender: TObject;
Args: TEventArgs);
begin
MessageBox.Show('您输入的是'#$A#$D + Edit1.Text , '测试');
end;
constructor TForm1.Create;
begin
{...}
with Button1do
begin
Name := 'Button1';
Top := 10;
Left := 130;
Width := 70;
Height := 28;
Text := 'Show!';
add_Click( Button1Click );
//增加事件
end;
{...}
end;
M
maxdell
Unregistered / Unconfirmed
GUEST, unregistred user!
UP
J
joe-liu
Unregistered / Unconfirmed
GUEST, unregistred user!
UP
S
seaerwang
Unregistered / Unconfirmed
GUEST, unregistred user!
ojkuuuuuppppppppp
酷
酷尔贝塔
Unregistered / Unconfirmed
GUEST, unregistred user!
领分的来了。+[
]
]
S
shaman
Unregistered / Unconfirmed
GUEST, unregistred user!
up
C
catfox
Unregistered / Unconfirmed
GUEST, unregistred user!
[
]
]
Z
zxbyh
Unregistered / Unconfirmed
GUEST, unregistred user!
up
N
nibul
Unregistered / Unconfirmed
GUEST, unregistred user!
[]
]
蝙
蝙蝠
Unregistered / Unconfirmed
GUEST, unregistred user!
问题我现在不会，祝楼主新年快乐，我现在一无所有了，给点分，行不？[][]
][]
S
st_cumt
Unregistered / Unconfirmed
GUEST, unregistred user!
消息出来
玩
玩命
Unregistered / Unconfirmed
GUEST, unregistred user!
在VF中 this 代表本身。
菲
菲儿
Unregistered / Unconfirmed
GUEST, unregistred user!
up，这是个事件委托模式，和delphili的button1.onclick:=myclick;差不多，
只不过delphi给隐藏了
只不过delphi给隐藏了
K
kevin.zhu
Unregistered / Unconfirmed
GUEST, unregistred user!
C++Builder是可以这样实现的
mybn->OnMouseUp=MyMouseUp;
MyMouseUp的写法如下
void __fastcall TMainForm::MyMouseUp(TObject *Sender,TMouseButton Button, TShiftState Shift, int X, int Y)
mybn->OnMouseUp=MyMouseUp;
MyMouseUp的写法如下
void __fastcall TMainForm::MyMouseUp(TObject *Sender,TMouseButton Button, TShiftState Shift, int X, int Y)
L
lgxyy
Unregistered / Unconfirmed
GUEST, unregistred user!
up
菲
菲儿
Unregistered / Unconfirmed
GUEST, unregistred user!
thank!!
