Hallo Forum,
kleine Hintergrundinfo da ich keine Erfahrung habe mit binary Typ. Und vielleicht habe ich auch einen völlig falschen Ansatz gewählt bzw. ist overkill da in dem Feld nur normale Text-Zeichen.
Ich hab hier in einer
Mysql-
DB ein Feld 3 Zeichen mormale Text da dieses Feld als Schlüssel verwendet wird und ich auch nach Groß- und Kleinschreibung selektieren muß, musste ich leider das Feld als Binary anlegen. Die Tabelle wird hauptsächlich von einem PHP-Skript bearbeitet und da ist es auch kein Problem. Jetzt will ich aber dieses Feld auch mit Delphi anzeigen und schreiben.
nach durchlesen von Internet bin ich auf folgenden Code gekommen leider wird nichts in meinen Richedit angezeigt
folgendes habe ich im AfterScroll Event meine
Query geschrieben.
Delphi-Quellcode:
var
ts: TStream;
ms: TMemoryStream;
begin
try
ts := TStream.Create;
ts := ZQuery1.CreateBlobStream(ZQuery1.Fieldbyname('kuerzel'),bmRead);
try
ms := TMemoryStream.Create;
ts.Position := 0;
ms.LoadFromStream(ts);
ms.position := 0;
RichEditID.Lines.LoadFromStream(ms);
finally
ms.Free
end;
finally
ts.Free;
end
end;
Vielen Dank schon mal für eure Hilfe
Micha