Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**Neotracer64**

Mach so:

Delphi-Quellcode:

			try

  DMPlaetzePflegen.ADOCommand1.CommandText :='sql_string';

  DMPlaetzePflegen.ADOCommand1.Execute;

except

Failed := True;

end; // except end;

finally

If Failed Then FAILSQL Else PASSSQL;

end; //Finally End;

Neotracer64 Registriert seit: 27. Okt 2004 292 Beiträge Delphi 7 Professional	#3 Re: try except und Finally Problem 23. Dez 2005, 17:10 Mach so: zusammenfalten · markieren Delphi-Quellcode: try DMPlaetzePflegen.ADOCommand1.CommandText :='sql_string'; DMPlaetzePflegen.ADOCommand1.Execute; except Failed := True; end; // except end; finally If Failed Then FAILSQL Else PASSSQL; end; //Finally End;
	Zitat

Einzelnen Beitrag anzeigen

Re: try except und Finally Problem