Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
8. Okt 2004
procedure TForm1.SpeedButton3Click(Sender: TObject);
var
fs: TFileStream;
m: Integer;
begin
if opendialog1.execute then begin
fs := TFileStream.Create(OpenDialog1.FileName, fmOpenRead);{ExtractFilePath(ParamStr(0))+'HighScore.hs'}
try
try
// erstmal wieder leeren
Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
8. Okt 2004
Aehm string ?
Vielleicht ist es für dich trivial, jedoch vermag ich es nicht zu verstehen.
MfG
Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
8. Okt 2004
Ich frage mich, warum er bei dir nicht abstürzt und bei mir schon :/ grml. Ich hbae den code nur angepasst, nicht mehr.
code : siehe editieren Beitrag
MfG
//edit:
wenn ich bei mir erst "lesen" lasse und dann auf speichern klicke stürzt das Programm ebenfalls mit einer Zugriffsverletzung ab.
Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
8. Okt 2004
nunja funktionieren stelle ich mir anders vor :P
Also es funktioniert nur einmal. Bei einem erneuten ausführen der laden funktion stüzt delphi komplett ab :D, wegen einer "Zugriffsverletzung".
Außerdem zeigt er mir nicht die Werte an, er zeigt nichts an im "showmessage":
Code sieht so aus:
type
zeiten= packed record
name: string;
bzeit: string;
Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
8. Okt 2004
So langsam habe ich es ja verstanden, jedoch fehlt mir ein konkretes Beispiel mit TReader und TWriter. Das einzige, was ich in der CL und im Forum finde, beschreibt niemals die genaue Verwendung der Syntaxs.
habt ihr vieleicht einen Konkreten link etc...
MfG
@Luckie thx, werde ich sofort mal testen
Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
7. Okt 2004
Ich habe die 14 Ergebnisse abgesucht und bin doch nicht schlauer geworden. :( den einzigen code, den ich gefunden habe ist der hier:
procedure WriteStringToStream(stream: TFileStream; str: string);
var
len: integer;
begin
len := length(str); // Länge des strings ermitteln
stream.write(len, SizeOf(len)); // Länge des Strings speichern
stream.write(PChar(str)^, len); // String...
Forum: Object-Pascal / Delphi-Language
Delphi
by Mr_Anderson,
7. Okt 2004
ich habe ein ähnliches Problem. Bei mir ist der Array mit dem Typ Record verknüpft:
type
zeiten= record
name: string;
bzeit: string;
versuch: integer;
end;
im Privat Bereich :
testr : array of zeiten;