Zitat von
littleDave:
Vielen Dank für die Liste - die nächste Version wird die Funktionen nachgebaut drinnen haben.
mach die einfach ein nur dann rein, wenn auch nötig ... es muß in aktuellen Versionen ja nicht unbedingt doppelter Ersatz-Code vorhanden sein
Delphi-Quellcode:
{$IF not Declared(PosEx)}
function PosEx(...): string;
begin
...
end;
{$IFEND}
bzw.
Delphi-Quellcode:
interface
{$IF not Declared(PosEx)}
function PosEx(...): string;
{$DEFINE INCLUDE_POSEX}
{$IFEND}
implementation
{$IFDEF INCLUDE_POSEX}
function PosEx(...): string;
begin
...
end;
{$ENDIF}
[add]
OK, man könnte es auch von der Delphi-Verion abhängig machen, aber so ist es wohl einfacher ... also wenn man nicht ständig gucken muß, wann was eingeführt wurde usw.