Funktionen aus Externer Unit

[Masteric]

Hi,

es kann sein, dass die Frage schon beantwortet wurde, aber ich frag sie trotzdem mal.

Ich will eine function in eine eigene Unit packen, damit ich sie mit neuen Programmen in Delphi nutzen kann, ohne den Quelltext unnötig lang zu machen. Hat auch alles soweit geklappt, aber beim einbinden in ein Programm, da hängst dann.

Geht das überhaupt?? Bisher habe ich nur Procedure aus externen Units eingebungen. Geht das auch mit Funktionen?



Hoffe mal ihr könnt mir helfen.


Aber shcon mal danke im Vorraus für alle Tipps.


MfG Masteric


[edit=Matze]2 Tippfehler im Titel korrigiert, damit man das Thema leichter wiederfinden kann. MfG, Matze[/edit]

[Sharky]

Hai Masteric,

ersteinmal: Herzlich Willkommen in der Delphi-PRAXiS

Zitat von Masteric:

... Bisher habe ich nur Procedure aus externen Units eingebungen. Geht das auch mit Funktionen? ...

Das geht mit Funktionen genau so wie im Procedureen.

Delphi-Quellcode:

unit zusatzunit;

interface

function Addiere(a, b: Integer): Integer;

implementation

function Addiere(a, b: Integer): Integer;
begin
  result := a + b;
end;

end.

Delphi-Quellcode:

unit U_Main;
..

implementation

{$R *.dfm}

uses
 zusatzunit;

procedure TDemo_Form.Button1Click(Sender: TObject);
var
 x : Integer;
begin
 x := Addiere(3,5);
end;

[Masteric]

Sharky, danke für die schnelle Hilfe.

Das hier ist echt eins der besten Foren.