Ich denke mal eine Fehlermeldung wird unter anderem lauten
Code:
[Pascal Fehler] : E2065 Ungenügende Forward- oder External-Deklaration: 'TForm1.Zug'
Das heißt, du hast dem Programm gesagt, dass TForm1 eine Methode names 'Zug' besitzt.
Dann mußt du natürlich diese Methode auch implementieren. 'TForm1.' hast du im Implementation-Teil vor 'Zug (...)' vergessen.
Das du unter anderem auch 3 "Buffen" namens 'Zug' in deinem Code stehen hast, wurde dir ja schon nahe gelegt.
Beispiel:
Delphi-Quellcode:
type
TForm1 = class(TForm)
...
private
...
procedure MachZug(var AZug, AWid:integer);
...
public
...
end;
var
... gZug ... : Integer;
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.MachZug(var AZug,AWid:integer);
begin
...
end;