24. september 2003 - 15:53Der er
3 kommentarer og 1 løsning
TBlobStream har jeg ikke
Place a query object on your form (Query1) Place a Edit object on your form (Edit1) Place a Button object on your form (Button1) Double-Click on the query and add the memo field. (Biolife.db using notes field) Set Query1's SQL property to: Select * from Biolife Set Query1's Active property to: True Add the following code to Button1's OnClick event:
procedure TForm1.Button1Click(Sender: TObject); var bs : TBlobStream; p : array [0..50] of char; begin FillChar(p, SizeOf(p), #0); bs:= TBlobStream.Create(Query1Notes, bmRead); try bs.Read(p,50); finally bs.Free; end; Edit1.Text:=StrPas(p); end;
Reference:
Sådan en TBlobStream har jeg ikke i min Pacal/Delphi ? Hvorfor ikke? VH SprøgerJørgen
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
Den siger : [Error] Unit1.pas(29): Undeclared identifier: 'TBlobStream' Og den er jo erklæret ? Når jeg holder Ctr nede og klikker med musen kommer der ikke noget ? VH SpørgerJørgen /ved Koden12
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.