Problem mit TurboPascal 5.5

[fkerber]

Hi!
Normalerweise programmier ich nur mit Delphi und dachte mir, ich will mal grad was ausprobieren und hänge jetzt :?

Ich will einfach nur ein Fenster erstellen. und hab dafür einfach die Api-Aufrufe genutzt, die auch in Delphi gehen, aber es geht nicht.

Bereits bei uses sagt er mir, dass er Windows.tpu nicht finden kann. Ist auch klar, die gibts nicht.
Aber wie kann ich denn mit TurboPascal 5.5 ein Fenster erstellen?

Ciao und danke schonmal

fkerber

[Luckie]

In dem du alle Funktionen zur Laufzeit aus den DLL's importierst. versuch mal das:

Delphi-Quellcode:

program MiniApp;

const
  CAPTION = 'Useless MiniApp';
  TEXT = 'Hello World.';

const
  MB_ICONINFORMATION = $00000040;

type
  HWND = THandle;
  UINT = LongWord;

function MessageBox(hWnd: HWND; lpText, lpCaption: PChar; uType: UINT): Integer;
  stdcall; external 'user32.dll' name 'MessageBoxA';

begin
  MessageBox(0, TEXT, CAPTION, MB_ICONINFORMATION);
end.

mit TP zu kompilieren.

[fkerber]

Hi!

Danke für deine schnelle Hilfe, allerdings bekomme ich folgende Fehlermeldung

Zitat:

Zitat von TurboPascal

Error 3: Unknown identifier

Sie bezieht sich auf die Zeile

Zitat:

Zitat von Luckie

HWND = THandle;

Ciao fkerber

[Christian Seehase]

Moin fkerber,

tausch mal THandle durch LongWord aus.

[fkerber]

Hi!

Hat leider auch nicht geholfen, gleicher Fehler!

ciao fkerber

[Luckie]

TP kjennt auch den Datentyp LongWord nicht? Probier es mal mit Cardinal.

[Christian Seehase]

Moin fkerber,

oder allgemein gesagt:
Tausche THandle gegen einen 32 Bit Typ aus.

[fkerber]

Hi!

Imnmer noch das selbe!

ciao fkerber

[fkerber]

Hi!

Was wäre dann ein 32 Bit-Typ?

ciao fkerber

[Luckie]

Dann nimm Integer. Oder ist ein Integer nur 16 Bit bei TP?