[Error] Record, object or class type required

[Trogge]

Hallo,

ich habe ein kleines Problem bei einem größeren Delphi-Projekt.
Ich füge mal die wichtigsten Abschnitte ein:

Die Methode (Zeilennummern eingefügt):

Delphi-Quellcode:

{425} function TUebersetzer.Uebersetze_Komm_KontEnd(Befehl: TBefehl): TBefehl;
{426} begin
{427}   with Befehl do
{428}   begin
{429}     DelphiBefehl := DelphiOperator;
{430}     DelphiBefehl := DelphiBefehl + DelphiOperanden[1].Raw;
{431}   end;
{432}   result := Befehl;
{433} end;

Die Typdefinition des 1. Records:

Delphi-Quellcode:

type
  TBefehl = record
    KarolBefehl,DelphiBefehl : String;       //Befehle komplett zusammengesetzt
    KarolOperator,DelphiOperator : String;   //Operator-Teile
    KarolOperanden : Array[1..3] of TValue;  //Operanden-Teil Karol
    DelphiOperanden : Array[1..5] of String; //Operanden-Teil Delphi
    AnzahlOperanden : Integer;               //Anzahl an Operanden
    Typ : Integer;                           //Befehls-Typ
  end;

Typdefinition des 2. Records:

Delphi-Quellcode:

type
  TValue = record
       Raw : String;  //Value unbearbeitet
    Number : String;  //Value ohne Typ-Kennzeichen
    Source : Char;    //Typ-Kennzeichen
  end;

Ich bekomme folgenden Fehler

[Error] uUebersetzer.pas(430): Record, object or class type required

[jfheins]

Hast du es mal ohne das with probiert?

Vergiss es, Lösung ist einen Beitrag weiter unten. String ist kein Klassentyp, daher kannst du den Punkt nicht anwenden.

[Bummi]

DelphiOperanden : Array[1..5] of String;

verus

DelphiBefehl := DelphiBefehl + DelphiOperanden[1].Raw;

[mkinzler]

with ... ist gefährlich, da man nie weiss, ob der Compiler auf "das Richtige" schlieest

Delphi-Quellcode:

function TUebersetzer.Uebersetze_Komm_KontEnd(Befehl: TBefehl): TBefehl;
var
    v: TValue;
begin
    Befehl.DelphiBefehl := Befehl.DelphiOperator;
    v := Befehl.DelphiOperanden[1]
    Befehl.DelphiBefehl := Befehl.DelphiBefehl + v.Raw;
    result := Befehl;
end;

[Bummi]

Zitat:

@mkinzler
function TUebersetzer.Uebersetze_Komm_KontEnd(Befehl: TBefehl): TBefehl;
var
v: TValue;
begin
Befehl.DelphiBefehl := Befehl.DelphiOperator;
v := Befehl.DelphiOperanden[1]
Befehl.DelphiBefehl := Befehl.DelphiBefehl + v.Raw;
result := Befehl;
end;

habe ich jetzt einen Hänger ....

DelphiOperanden : Array[1..5] of String;

[Trogge]

:oops:

Alles klar. DelphiOperaden und KarolOperanden verwechselt.

Danke für die Hilfe^^