Edit und string

[Sharky]

Zitat von Spider:

...

Code:

const
  Zahl1 = '/cu';
  Zahl2 = '/cu';

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
  if Zahl1 = Zahl2 then
    begin
      close;
    end;
end;

Da könntest Du auch schreiben :

Delphi-Quellcode:

 if 1 = 1 then
  begin
   close;
  end;

Denn Du prüfst ob zwei Konstanten gleich sind. Und bei dir sind sie es per vorgabe.