Das in der Zip-Datei war doch dein vollständiges Projekt, oder etwa nicht?
Davon gehe ich nicht aus. Die Dateien sind von 1996/1997, was zwar nicht zwingend dagegenspricht, aber es findet sich ein Copyright von jemandem aus den USA am Anfang der Units.
Stimmt, darauf habe ich gar nicht geachtet.
Wendelin schrieb aber doch, wie ich es verstand, er könne von der
Unit position aus nicht auf die anderen Units zugreifen, und das kann erstmal auch nicht gehen, wenn er sie nicht in die USES-Klausel aufnimmt. Doch offensichtlich habe ich den Satz falsch interpretiert: er kann also nicht auf die Methoden in position.pas zugreifen. Da war meine Aufmerksamkeit wohl gerade im Keller Kohlen schaufeln
Die Lösung hast du ja bereits hingeschrieben. Ich mach's nochmal ein bißchen konkreter:
@Wendelin
In position.pas gibt es die Klasse TChessPosition.
type
TChessPosition = class
Nun erstellst du in der
Unit, in der du diese Klasse verwenden willst, eine Variable vom Typ dieser Klasse, entweder in einer deiner eigenen Methoden oder global, wenn du diese Klasse öfters in deiner
Unit oder deinem Mainform benötigst:
Delphi-Quellcode:
...
Implementation
Uses
Position;
Var
ChessPos : TChessPosition;
Procedure TFormMain.Create(Sender: TObject);
begin
ChessPos := TChessPosition.Create;
end;
Procedure TFormMain.Destroy(Sender: TObject);
begin
ChessPos.Free;
end;