Moje pytanie jest związane z wysyłaniem maila. Uzywam komponentu NMSMTP i wszystk jest OK.
wyglada to mniej wiecej tak:
[code]
try
. tutaj jest caly kod na wyslanie maila
.
except
raise Exception.Create(' jakiś tekst');
end;
[/code]
Wie ktoś może żeby w przypadku niepowodzenia wysłania zamiast wyswietlonego tekstu wywolac jakas moja procedure? Czy moze te wyjatki pozwalają tylko na wyswietlanie tekstu ?
try
. // tutaj jest caly kod na wyslanie maila
.
except
ShowMessage('No nie udało się');//Może byc też MessageBox (wedle uznania)
end;
Wie ktoś może żeby w przypadku niepowodzenia wysłania zamiast wyswietlonego tekstu wywolac jakas moja procedure? Czy moze te wyjatki pozwalają tylko na wyswietlanie tekstu ?
try
raise EAccessViolation.Create('Hello'); //tylko do celow demnostracyjnych :-)
except
Application.Terminate; // Exampl, zamknie aplikacje tutaj wsad wywołanie do procedury!!
end;
No dobra ale jak wykonać jakąś procedure???
No dobra ale jak wykonać jakąś procedure???
try
raise EAccessViolation.Create('BleBle');
except
NazwaProcedury(DurnyLeniu);
end;