Also meine
Unit sieht folgendermaßen aus
Delphi-Quellcode:
{
Versionsnummer und Datum
}
unit Myunit;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Registry,JPEG,ShlObj,
ActiveX, ComObj,shellapi,extctrls,FileCtrl;
procedure Test1;
//Globale Variablen
implementation
{******************************************************************************
Informationen
}
Procedure Test1;
Begin
End;
end.
Die
Unit Speicherst du mit der Dateiendung
PAS ab und kopierst diese in dein Projektordner.
Bei deinem Projekt fügtst du dann bei uses myunit hinzu.
Um die Prozedur eins aufzurufen schreibst du dann : myunit.Test1;