Einzelnen Beitrag anzeigen

ringli

Registriert seit: 7. Okt 2004
504 Beiträge
 
Delphi 11 Alexandria
 
#5

AW: einString.equals regiert nicht auf Vergleich

  Alt 23. Aug 2015, 08:17
@EinsteinXXL:

Dann wäre deine Formatierung wenig hilfreich. Du schreibst:
Delphi-Quellcode:
  // - Prüfe ob COMMAND leer ist, wenn ja, dann COMMAND String ist Commandline, rest sollte selbsterklärend sein
  if COMMAND.Empty then begin
    COMMAND := AnsiUpperCase(Commandline);
  end
  else
    COMMAND := AnsiUpperCase(COMMAND);
    PARAMETER := commandline.Substring(AnsiPos(COMMAND,commandline) + COMMAND.Length).ToLower;
Meinst du es so wie du es geschrieben hast (mal etwas umformatiert):
Delphi-Quellcode:
  // - Prüfe ob COMMAND leer ist, wenn ja, dann COMMAND String ist Commandline, rest sollte selbsterklärend sein
  if COMMAND.Empty then
    begin
      COMMAND := AnsiUpperCase(Commandline);
    end
  else
    begin
      COMMAND := AnsiUpperCase(COMMAND);
    end;
  
  PARAMETER := commandline.Substring(AnsiPos(COMMAND,commandline) + COMMAND.Length).ToLower;
Oder doch eher so:
Delphi-Quellcode:
  // - Prüfe ob COMMAND leer ist, wenn ja, dann COMMAND String ist Commandline, rest sollte selbsterklärend sein
  if COMMAND.Empty then
    begin
      COMMAND := AnsiUpperCase(Commandline);
    end
  else
    begin
      COMMAND := AnsiUpperCase(COMMAND);
      PARAMETER := commandline.Substring(AnsiPos(COMMAND,commandline) + COMMAND.Length).ToLower;
    end;
In der anderen Prozedur sind auch solche Formatierungen drinne, aber ich habe mal jetzt nur diese als Beispiel genommen.

Geändert von ringli (23. Aug 2015 um 08:22 Uhr)
  Mit Zitat antworten Zitat