Einzelnen Beitrag anzeigen

xbu58

Registriert seit: 10. Dez 2002
Ort: Bäretswil / Schweiz
121 Beiträge
 
Delphi 7 Enterprise
 
#2
  Alt 12. Jan 2003, 19:36
hallo Blizzard

Ich weiss nicht, ob das was Du gemacht hast überhaupt funktioneren kann. Als werde ich keinen Kommentar dazu abgeben und an Stelle dessen sagen, wie ich das jeweils mache.

Code:
procedure SaveToMemo(AStrList: TStrings; AMemoFld: TMemoField);
var
  xMemStream : TMemoryStream;
begin
  xMemStream := TMemoryStream.Create;
  try
    AStrList.SaveToStream(xMemStream);
    AMemoFld.LoadFromStream(xMemStream);
  finally
    xMemStream.Free;
  end;
end;
Natürlich muss das ADOQuery vorher aktiviert worden sein und das Feld bestehen. Weiter muss vorher entweder <Query>.Edit;, <Query>.Insert; oder <Query>.Append; und nachher <Query>.Post aufgerufen werden.

So mache ich das auf SQLServer und SQLAnywhere mit ADO. Bei beiden DBServern funktioniert das. Also sollte das auch bei Access gehen.

Gruss
Xaver
  Mit Zitat antworten Zitat