Klassen Dynamisch erzeugen und verwalten?!

[barf00s]

um nen eindeutigen dateinamen zu erzeugen kann man sich auch ein paar der ActiveX funktionen bedienen...

Delphi-Quellcode:

uses
  ActiveX, ComObj;

var
  xGuid: TGuid;

begin
  CoCreateGuid(xGuid);
  sFileName := GuidToString(xGuid);
end;