Thema: Delphi String aufbereiten

Einzelnen Beitrag anzeigen

Benutzerbild von Salomon
Salomon

Registriert seit: 9. Jun 2002
453 Beiträge
 
#1

String aufbereiten

  Alt 3. Feb 2003, 15:40
Hallo,
ich habe schon wieder eine Frage zu einem Codeschnipsel der Strings aufbereitet. cmd ist ein String der vom Client an den Server geschickt wird.
Kann mir einer erklären was genau mit dem String gemacht wird?

Code:
  if CB.GetCB(cmd) then
    begin
    par:=trim(getend(cmd,2));
    cmd:=trim(stupcase(getword(cmd,1)));
    while (cmd <> '') and not (cmd[1] in ['a'..'z','A'..'Z','0'..'9']) do cmd:=copy(cmd,2,255);
    while (cmd <> '') and not (cmd[length(cmd)] in ['a'..'z','A'..'Z','0'..'9']) do dec(byte(cmd[0]));
Mfg
Salomon
01001000 01100001 01101100 01101100 01101111
01010111 01100101 01101100 01110100 00100001

http://www.it-adviser.net
  Mit Zitat antworten Zitat