funktionen aus fremder unit verwenden

[Pseudemys Nelsoni]

hoi,

ich habe eine unit von nem "freund" in der funktionen usw drin sind... ich hab die datei in die uses eingetragen, aber ich kann der functionen in meinem prog nicht verwenden, angeblich undefinierter bezeichner....wie kann ich denn funktionen aus der unit verwenden?

[Luckie]

Sind sie auch im Interface-Abschnitt öffentlich gemacht?

Unit1:

Delphi-Quellcode:

uses
  Unit2;

procedure TForm1.Button1Click(Sender: TObject);
begin
  ShowMessage(IntToStr(Addiere(3,5)));
end;

Unit2:

Delphi-Quellcode:

unit Unit2;

interface

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

implementation

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

end.

[Pseudemys Nelsoni]

danke luckie, jetzt gehts, es fehlte in meiner test unit die zeile zwischen interface und implementation...

Delphi-Quellcode:

unit gcc;

interface

function Rand(Randfrom, Randto: integer): integer;  << die hier

implementation

function Rand(Randfrom, Randto: integer): integer;
begin
  Randomize;
  Repeat
    Result := Random(Randto);
  until Result > Randfrom-1;
end;


end.

kannst du mir erklären wie die proceduren/funktionen alle nochmal oben definiert sind? ich meine, ist ja irgendwie doppelt oder?

[CalganX]

Hi silent,
ich denke, dass es dich nicht stört, wenn ich jetzt mal antworte, denn bei Luckie dürfte es jetzt 1 Uhr morgens sein (und selbst das Luckie braucht ein wenig Schlaf). 8)

Das hat durchaus einen Sinn, so kannst du Funktionen nutzen, die nicht öffentlich sind, also auf die du von außerhalb nicht zugreifen kannst. Außerdem ist es ein Standard: oben werden die Funktion deklariert und unten werden sie definiert.

Chris

[Pseudemys Nelsoni]

danke für die antwort

bei luckie ist es 1? wo wohnt er denn?

[CalganX]

Guck mal auf sein Profil...

Aber deine Frage dürfte ja nun geklärt sein.

Chris

[Pseudemys Nelsoni]

ist luckie als deutscher dorthin gezogen? (das geht vom thema ab :\) interessiert mich aber, also das war die letzte frage ^^