BeforeConnect event handler se koristi da se npr. postave neke specifične akcije pre otvaranja konekcije. Npr.:
Code:
with Sender as TZConnection do
begin
if LoginPrompt = False then
begin
Hostname := 'Naziv_Hosta';
Port := Broj_porta;
end;
end;
Pošto si postavio specifične zahteve, ukoliko dođe do izuzetka, u ovom slučaju nekorektnosti hosta ili porta, postaviš i poruku s pram toga (u delu gde vriš konekciju na bazu), npr. event handler OnClick za TButton:
Code:
try
ZConnection1.Connect;
except
on E: Exception do
ShowMessage(E.Message);
end;
ili
Code:
try
ZConnection1.Connect;
except
on E: Exception do
ShowMessage('Host ili port nisu korektni!');
end;
Someone's sitting in the shade today because someone planted a tree a long time ago.