Problem WindowState

[Fallenzer]

Hallo und guten Tag,

ich wollte ein neues Delphiprogramm schreiben, einen Videoplayer.
Dabei bin ich schon zu großen Fortschritten gekommen...

Aber hier ist ein Problem mit einer Checkbox, im Zusammenhang mit WindowState, aufgetreten.



Hier ist der Code:

Delphi-Quellcode:

procedure TForm1.CheckBox1Click(Sender: TObject);
begin
  if Checkbox1.Checked=True then
  begin
    if WindowState.wsMaximized=True then
    begin
    showmessage('Sie müssen die Maximalansicht verlassen, um den Vollbildmodus verwenden zu können.');
    Checkbox1.Checked:=False;
    end;
    if WindowState.wsNormal=True then
  //...
  end;
end;

Genauere Informationen zum Problem:

In den Zeilen 5 und 10 des Codes werden folgende Fehler angezeigt:
[dcc32 Fehler] Unit1.pas(178): E2018 Record, Objekt oder Klassentyp erforderlich
[dcc32 Fehler] Unit1.pas(183): E2018 Record, Objekt oder Klassentyp erforderlich


Ich bitte dringend um Hilfe.



P.S. : Ich benutze RadStudio 10.3.1 von Embarcadero.

[DeddyH]

WindowState ist ein Enum und keine Klasse bzw. Record. Es muss also heißen

Delphi-Quellcode:

if WindowState = wsMaximized then
  //Code

P.S.: Tu Dir selbst einen Gefallen und vergleiche nicht mit Boolean-Konstanten.

Zitat:

if Checkbox1.Checked=True then

-->
if Checkbox1.Checked then

[Fallenzer]

Herzlichen Dank, jetzt funkioniert es...https://www.delphipraxis.net/images/...icon_smile.gif