problem mit felddatenspeicherung

[toredo]

welche online-hilfe?



mfG toredo

[Klaus01]

nun, wenn Delphi installiert ist, ist in der Regel auch eine Hilfe dabei.


Grüße
Klaus

[toredo]

ja das schon, nur ich dachte weil du was von ner online-hilfe gesagt hast, dass die hilfe halt online ist und end beim proggi selbst...
und mein delphi is auch englisch und da hab ich nur folgendes rausgekriegt:

Zitat:

Delphi syntax:

function ReadBinaryStream(const Section, Name: string; Value: TStream): Integer; virtual;

dann hab ich das zusammengecodet:

Delphi-Quellcode:

    ts:= TMemoryStream.Create;
        try
    ts:=ini.ReadBinaryStream('Beschreibung:','ts','');
    ts.position:=0;
        finally
      m.Free;

aber es kommt n'fehler bei der zeile in der gelesen werden sollte, da kommt string und stream sind irgendwie nicht kompatibel:S



mfG toredo

[Klaus01]

Delphi-Quellcode:

ts:= TMemoryStream.Create;
try
  ini.ReadBinaryStream('Beschreibung:','ts',ts);
  ts.position:=0;
finally
  m.Free;

Wie Du in der Hilfe siehst ist ReadBinaryStream vom Syntax etwas anders als
ReadString. Hier wird als dritter Parameter der Stream erwartet und nicht
ein ''.

ReadBinayStream liefert einen Integer zurück, den kannst Du verwerten mußt Du aber nicht.

Grüße
Klaus

[toredo]

thx, das problem ist jetzt gelöst, aber jetzt kommt auf der gleichen zeile, dass tmemorystring udn integer nicht kompatibel sind:S

weiss jemand wo es ein gutes tut über inis gibt, das sich mti dem allem befasst, das könnte ich nämlich gebrauchen



mfG toredo

[Klaus01]

Du hast doch nicht etwa noch diese da stehen?
 ts:=ini.ReadBinaryStream('Beschreibung:','ts',''); das kann auch nicht gehen, weil wie oben beschrieben
ini.ReadBinaryStream einen Integer zurückgibt.
TMemoryStream und Integer vertragen sich halt so nicht.

Das sollte eigentlich so aussehen.
ini.ReadBinaryStream('Beschreibung:','ts','');
Grüße
Klaus

[toredo]

ok, das ende naht

Delphi-Quellcode:

    ts:= TMemoryStream.Create;
        try
    ini.ReadBinaryStream('Beschreibung:','ts',ts);
    ts.position:=0;
        finally
        RichEdit2.Text:=ts;
      ts.Free;
      end;

jetzt muss ich nur noch den text von ts zu nem string machen, weil bei der zeile RichEdit2.Text:=ts; kommt sonst ne meldung.

thx, dass ihr mich noch nicht aufgegeben habt



mfG toredo

[Klaus01]

Delphi-Quellcode:

ts:= TMemoryStream.Create;
try
  ini.ReadBinaryStream('Beschreibung:','ts',ts);
  ts.position:=0;
   RichEdit2.lines.loadfromStream(ts);
finally
   ts.Free;
end;

Grüße
Klaus

[toredo]

thx, jetzt funzt alles
hab noch en frage die nicht unbedingt beantwortet werden muss, da es nicht so wichtig ist.
kann man auch machen, dass mehr als 1023 zeichen gespeichert werden können?

wie schon gesagt, das ist nicht so wichtig, wäre aber geil


thx für die gute hilfe , ohne euch (besonders ohne klaus01) hätte ich das nie geschafft



mfG toredo

[Klaus01]

was ist denn auf 1023 Zeichen begrenzt?

TIniFile kann bis auf max 64KByte anwachsen,
wenn es größer gewünscht wird auf TMemIniFile umsteigen.

Grüße
Klaus