Zitat von
Spider:
Delphi-Quellcode:
unit unit1;
interface
uses
Windows, Messages, etc....
type
TForm1 =
class(TForm)
Button1: TButton;
procedure Button1.click(Sender: TObject);
private
{Private-Deklarationen}
public
{Public-Deklarationen}
procedure ordner;
//<-- Fehler 1
end;
var
Form1: TForm1;
implementation
uses unit2;
{$R *.DFM}
procedure Form1.ordner;
//<-- Fehler 2
begin
{Quelltext der Prozedur}
end;
procedure TForm1.Button1.Click(Sender:TOBject);
begin
{Quelltext des Buttons}
end;
end.
@Spider habe es jetzt so gemacht, wie du geschrieben hast, bei Fehler 1 sagt er:
Ungenügende Forward- oder External-Deklaration bei TForm1.Ordner;
Bei Fehler2 sagt er:
Bezeichner redefiniert: 'form1'
Was mach ich nur immer falsch?
[Edit] Lösung gefunden Bei Fehler2 muss
TForm1.ordner
stehen. Dann funzt es auch!!! Danke an alle für die Hilfe
