Registriert seit: 12. Dez 2004
Ort: Wien, Österriech
893 Beiträge
Delphi 6 Enterprise
|
Re: Frage zu überladenen Methoden
29. Mär 2005, 13:57
Nun ja. Es ist aber nachvollziehbar.
So geht das :
Delphi-Quellcode:
transferData(const aList: TStrings; UpdatePicturePath: boolean = false; aQuery: TObject = nil): boolean;
begin
if aQuery is TADOquery then
begin
TADOquery(aQuery).sql....
end
else
if aQuery is TZDOQuery then
begin
TZDOquery(aQuery).sql....
end;
end;
Katura Haris Es (ein gutes Wort) ist wie ein guter Baum, dessen Wurzel fest ist und dessen Zweige in den Himmel reichen.
|