Einzelnen Beitrag anzeigen

Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#11

Re: Procedure nicht sichtbar...

  Alt 24. Feb 2006, 18:42
Natürlich sind sie das:
Delphi-Quellcode:
unit Unit2;

interface

uses
  Dialogs;

type
  TDummy = class(TObject)
  private
    procedure Foobar;
  public
    procedure DoSomeThing;
  end;

implementation

procedure TDummy.DoSomething;
begin
  ShowMessage('Kuckuck');
end;

procedure TDummy.Foobar;
begin
  ShowMessage('Foobar');
end;

end.
Delphi-Quellcode:
uses
  Unit2;

procedure TForm1.Button1Click(Sender: TObject);
var
  Dummy: TDummy;
begin
  Dummy := TDummy.Create;
  try
    //Dummy.Foobar; // geht nicht da private
    Dummy.DoSomeThing; // geht da public
  finally
    FreeAndNil(Dummy);
  end;
end;
Du solltest dir mal das Tutorial durchlesen, dann weißt du auch, was es mit den Sichtbarkeiten auf sich hat.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat