Prüfen, ob biMaximize in BorderIcons vorhanden

[Waldteufel]

Hi.

Zitat von Michael_Bayer:

Da kommt ein "Der linken Seite kann nichts zugewiesen werden"

Delphi-Quellcode:

procedure MachWas;
var
  x : set of char;
begin
  Include(x, 'c');
  Include(x, 'y');
  if 'c' in x then ShowMessage('c is drin...');
  if 'h' in x then ShowMessage('h is drin...');
  Exclude(x, 'c');
  Include(x, 'h');
  if 'c' in x then ShowMessage('c is jetzt drin...');
  if 'h' in x then ShowMessage('h is jetzt drin...');
end;

liefert 'c ist drin...' , 'h ist jetzt drin...'