![]() |
Wookiee mit Delphi Problem Die 2te
Also gestern habt ihr mir ja schon ma sehr geholfen aber ich brauch euch wieder! Folgendes: Speichern tut er alles in der File, aber wenn ich auslesen lassen will dann bekomme ich Meldung, dass Integer und TFilm(Record) nicht kompatibel sind!
Record sieht so aus:
Delphi-Quellcode:
Und der Read Teil sieht so aus:
TFilm = Record
Filmtitel:String[50]; Qualitaet:Byte; Humor:Byte; Spannung:Byte; Action:Byte; Medium:TCombobox; Datent:Byte; End;
Delphi-Quellcode:
Das seltsame is aber, dass er das erst ab Spannung sagt und Humor noch funktioniert!
procedure TForm1.N1Click(Sender: TObject);
begin Read(Movie,Film); Stringgrid1.cells[0,1]:=Film.Filmtitel; Read(Movie,Film); Stringgrid1.cells[1,1]:=inttostr(Film.Qualitaet); Read(Movie,Film); Stringgrid1.cells[2,1]:=inttostr(Film.Humor); Read(Movie,Film); Stringgrid1.cells[3,1]:=inttostr(Film,Spannung); Read(Movie,Film); Stringgrid1.cells[4,1]:=inttostr(Film,Action); Read(Movie,Film); Stringgrid1.cells[6,1]:=inttostr(Film,Datent); end; HILFE! Danke jetzt schon ma! |
Hi,
bitte ändere die Überschrift Deiner Frage in eine aussagekräftige Überschrift. Danke! ...:cat:... |
Hallo Chewbacca,
könntest Du bitte für Deinen Beitrag noch fix einen passenden Titel angeben? Der Imperator dankt. :mrgreen: |
Ich würde mal die Kommas nach Film durch Punkte ersetzen.
|
Danke, das wars!
P.S. Ich werd mich bessern, versprochen! |
Alles funktioniert, aber ins letzte, also[6,1], gibt er, egal as ich einlesen hab lassen, 0 aus!
Warum tut er das!?! |
Mich würde zunächst interessieren, warum bei Dir sechsmal der Read-Befehl steht?
|
KA, ging glaub ich anders net!
Oder funktioniert des, wenn ich den einmal drüber schreib und dann die zuweisung der Tabelle drunter? |
Du liest sechsmal in Folge Film ein, warum? Hast Du sechs Datensätze?
|
So zum dritten und letzen Mal: Ändere bitte den Titel des Topics! Das wurde dir jetzt schon zweimal gesagt und hiermit zum dritten Mal.
Ich darf dich diesbezüglich auch noch mal auf die Regeln hinweisen, dennen du bei deiner Anmeldung zugestimmt hast. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 00:46 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz