Einzelnen Beitrag anzeigen

Pfl

Registriert seit: 5. Jun 2012
Ort: Berlin
65 Beiträge
 
Delphi XE6 Architect
 
#1

Record verwenden: Operator nicht anwendbar

  Alt 6. Mai 2016, 10:34
Hallo, liebe DP,

ich habe folgenden Fehler dazubekommen:

Operator ist auf diesen Operandentyp nicht anwendbar. Hier ist der code:

Delphi-Quellcode:
procedure TFormMain.pointerpos(dataset: integer);
var
  currentset: tProtokoll; // Var vom Typ record
begin
  if (protokoll < 0) or (protokoll >= filesize(protokolldatei))
  then
    exit
  else
  begin
    Seek(
      protokolldatei,
      protokoll); // Zeiger verschieben/vorbereiten
    read(protokolldatei, currentset); // Datensatz lesen
    // ---------------------------------------------
    // Zuweisen
    articleedit.Text := currentset.Hardwarename;
    modeledit.Text := currentset.Modellbaunummer;
    bcedit.Text := currentset.bc;
    asintext.Text := currentset.ASIN;
    employee.Text := currentset.Gradingschluessel;
    desc := currentset.Beschreibung_lang;
    kbmemo := currentset.Diagnosemeldung;
    SingleSellBOOL.Checked := currentset.EinzelVK;
    asshown.Checked := currentset.kompletteszubehoer;
    pckgis.Checked := currentset.ovp;
    condition.Text := currentset.Zustand;
    timestmp.Caption := StrToDateTime(currentset.zeitstempel);
    dpt.Text := currentset.Abteilung;
    screenactive.Checked := currentset.signal_an_screen;
    wlancheck.Checked := currentset.netzwerkverbindung;
    errcodeedit.Text := strtoint(currentset.Fehlercode_hex);
    erredit.Text := currentset.Fehlermeldung;
    Image1.Picture.Bitmap := currentset.bild1;
    Image2.Picture.Bitmap := currentset.bild2;
    Image3.Picture.Bitmap := currentset.bild3;
  end;
end;
Ich bitte schnellstmöglich um Hilfe!!

LG
Friedrich

Geändert von Pfl ( 6. Mai 2016 um 10:41 Uhr) Grund: Rechtschreibfehler korrigiert
  Mit Zitat antworten Zitat