Delphi-PRAXiS - Einzelnen Beitrag anzeigen

**-Phantom-**

Haltepunkt sagt mir nichts

Zitat:

function CreateInArchive(const classid: TGUID): I7zInArchive;
begin
Result := T7zInArchive.Create('7z.dll');
Result.ClassId := classid;
end;

-Phantom- Registriert seit: 26. Nov 2009 Ort: Bockhorst 319 Beiträge Delphi 7 Enterprise	#7 AW: Sevezip.pas [ISO] 22. Nov 2010, 23:00 Haltepunkt sagt mir nichts Zitat: function CreateInArchive(const classid: TGUID): I7zInArchive; begin Result := T7zInArchive.Create('7z.dll'); Result.ClassId := classid; end; Mathias Jansen
	Zitat