请看下面代码:
procedure TForm1.FormCreate(Sender: TObject);
begin
Session.GetDatabaseNames(ComboBox1.Items);
ComboBox1.Text:='DBDEMOS';
ComboBox1Change(self);
ListBox1.ItemIndex:=0;
ListBox1Click(self);
end;
请问Session是什么?
关于Self作何理解?
谢谢!!!
procedure TForm1.FormCreate(Sender: TObject);
begin
Session.GetDatabaseNames(ComboBox1.Items);
ComboBox1.Text:='DBDEMOS';
ComboBox1Change(self);
ListBox1.ItemIndex:=0;
ListBox1Click(self);
end;
请问Session是什么?
关于Self作何理解?
谢谢!!!
self我的理解就是使用当前的属性触发一个procedure,例如comboBox(Self),如果你的comboBox。text为空,或不是一个有效的值,comboBoxONClick(self)在使用text属性的时候就会出错~
一点愚见,呵呵