Probleme bei der Umsetzung eines Pascal-Programms in Delphi

[pimpf]

Hallo zusammen,

ich habe folgendes Problem:
Mir liegt der Programmcode eines (älteren) Programms vor, der wohl für Pascal geschrieben wurde. Es handelt sich jedenfalls um eine Konsolenanwendung. Ich wollte versuchen, dieses Programm in Delphi7 umzusetzen, aber es werden dort einige Prozeduren/Schlüsselwörter verwendet, die Delphi bei der Übersetzung anmeckert. Leider reichen meine Delphi-Kenntnisse nicht aus, um das Problem zu lösen.

Beispiel:

procedure TLocCounter.Draw;
begin
GOTOXY(Xpos,Ypos); CLREOL;
if IsVisible then begin
GOTOXY(Xpos, Ypos); WRITE('Zählerstand: ',GetCount:5);
end;
end;

Der Compiler meckert über den undefinierten Bezeichner GOTOXY. Die Prozedur GotoXY habe ich in der Delphi-Hilfe gefunden (daher gehe ich davon aus, dass sie eigentlich bekannt sein müsste???), ich habe auch versucht herauszufinden, ob ich vielleicht meine uses-Klausel anpassen muss, bin da aber nicht weiter gekommen.

CLREOL kennt Delphi anscheinend gar nicht, ist jedenfalls nicht in der Hilfe zu finden.

Das zugehörige Hauptprogramm verwendet die Unit CRT, die finde ich auch nicht.

Vielleicht kann mir jemand weiterhelfen?

[Hansa]

Was ist das für ein Programm ?? Realistisch wäre wohl, das ganze für Delphi umzusetzen.

[Skiron]

Ich nehme mal an, du hast in delphi 'ne konsolenanwendung genommen.
Dass es da GotoXY gibt, bezweifle ich.
Die Unit crt wirst du bestimmt nicht finden. Vielleicht gibts WinCRT (vielleicht)
Wegen dem ClrEOL: Kannste auch vergessen, indems GotoXY nicht gibt
Die Konsolenanwendung ist in Delphi ziemlich anders als im DOS-Pascal!

das GotoXY ist ws. in der Hilfe drin, weil die Hilfe vom Pascal einfach mitgenommen wurde (glaub ich jedenfalls)

[pimpf]

Das Programm ist nicht sonderlich spannend, es beschäftigt sich damit, wie man eine Klasse definiert (hier die Klasse TCounter) und daraus weitere Klassen mit veränderten Eigenschaften ableitet. Ich möchte das Programm eigentlich nur zu Lernzwecken umsetzen.

Ich würde natürlich auch diejenigen Prozeduren, die in Delphi nicht bekannt sind entsprechend ersetzen, wenn ich wüsste wie. Eben z. B.: Wie lege ich in Delphi für eine Konsolenanwendung die Position des Cursors fest (gotoxy funktioniert ja nicht)? Wie lösche ich den Bildschirm (clrscr funktioniert auch nicht)?

[Skiron]

den Cursor in einer Konsolenanwendung setzen - da bezweifle ich das das geht
du könntest aber ein Memo nehmen, da dann alles reinschreiben lassen. Da kannst du Cursorposition ect. alles schön festlegen.
Da ist halt das einlesen das Problem.

Wenn du das Prog nur für Lernzwecke brauchts, warum machst dus nicht mit Edit + Button?

[Hansa]

Die Prozeduren umzubauen ist ja wohl nicht viel. ClrEol dafür schreibst du eine For-Schleife und für ClrScreen ein 2-Dim. Array: FOR 1 := 1 TO 25 DO
FOR i := 1 TO 80 DO


blabla

[Luckie]

Oder man nimmt eine Inklude-Datei von Assarbad, in der alle nötigen Funktionen für die Win32 Konsole drin sind. Zu finden in meiner Toolbox: http://downloads.luckie-online.de -> Toolbox.zip -> ConTools.inc

[mirage228]

Gab es bei Delphi nicht mal eine WinCrt Unit dabei?

mfG
mirage228

[FastJack2]

Bin ich jetzt blöd oder überseh ich bloss die Datei ??
Luckie könntest du mal nen direkten Link posten plz ?

greetz
-FastJack2

[edit]AUTSCH ! ich sollte auch mal in die Unterordner schaun ...
somit - erledigt der Fall ;)[/edit]