Missing operator in verbindung mit ORD

[EWeiss]

Zitat von marabu:

Hallo Emil,

als ich Beitrag #5 schrieb habe ich deinen Beitrag #4 noch nicht gekannt - alles wird klar:

Delphi-Quellcode:

begin
    // ...

    For IntI := 1 To Length(StrView) do  // index läuft ab 1
    begin
      //  StrS := MidStr(StrView, IntI + 1, 1);  // nicht nötig
      if StrView[IntI] <> ' '
        then IntX := IntX + BWidth[Ord(UpCase(StrView[IntI])) - 65]; // nicht () sondern []
        else Inc(IntI(5);  //Bei Leerstring 5 hinzufügen
    // ...

Grüße

Danke das hat mir sehr geholfen.
werde es mal bei den anderen ebenfalls ändern und mal debuggen.

Wie immer Daumen hoch und Danke!
Wenns nicht klappt melde ich mich nochmal

EDIT: Was so ne klammer doch ausmacht

gruß