Einzelnen Beitrag anzeigen

Benutzerbild von Sir Rufo
Sir Rufo

Registriert seit: 5. Jan 2005
Ort: Stadthagen
9.454 Beiträge
 
Delphi 10 Seattle Enterprise
 
#8

AW: Fehlermeldung unklar: Record, Objekt oder Klassentyp erforderlich

  Alt 18. Apr 2013, 08:51
Hast du den Quellcode hier nachgetippt oder per CopyPaste reingehauen?

Denn dort finden sich mehrere Fehler, die dir der Compiler um die Ohren hauen sollte.

Delphi-Quellcode:
For Zaehler := 0 To 25 Do
  POS_EA := 0;

If EA[Zaehler].bs = Key
Then
  POS_EA := Zaehler;

CB3 := AW3[Pos_Ea].cb;

Pos von bs=CB2 AUF WALZE POS_BS3

FOR ZAEHLER := 0 TO 25 DO
  IF AW3[Zaehler].BS = CB3;
  THEN
    Pos BS3 := zaehler;

CB2 := AW2[POS_BS].CB;

FOR zaehler := 0 to 25 do
  If aw2[zaehler] BS = CN2
  Then
    Pos_bs2 := zaehler;
  
CB1 := Aw1[Pos_bs2].CB;

FOR zaehler := 0 to 25 do
  if aw1[zaehler].bs = Cb1
  Then
    POS_BS1 := Zaehler;

  REF1 := Aerial[POS_bs1].bs;

For zaehler := 0 to 25 do
  Begin
    If ( areflektor[zaehler].bs = ref1 ) and ( zaehler > Pos_bs1 ) )
    Then
      pos_ref := zaehler;

    Edit10.Text:= Edit10.Text + AEa[Pos.W3].Bs
  end;

end.
Kaum macht man's richtig - schon funktioniert's
Zertifikat: Sir Rufo (Fingerprint: ‎ea 0a 4c 14 0d b6 3a a4 c1 c5 b9 dc 90 9d f0 e9 de 13 da 60)

Geändert von Sir Rufo (18. Apr 2013 um 08:57 Uhr)
  Mit Zitat antworten Zitat