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