Helpful to verify reports of your own downtime, or to double check a downed website you are trying to access.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
procedure TEtusivu.IWButton1Click(Sender: TObject); var strBlob, strTmp: TStream; begin try cdsBlobtest.Edit; strBlob := cdsBlobtest.CreateBlobStream(cdsBlobtest.FieldByName('Image'), bmWrite); strTmp := TMemoryStream.Create; strBlob.CopyFrom(strTmp,0); cdsBlobtest.Post; cdsBlobtest.ApplyUpdates(0); finally strBlob.Free; strTmpfree; end; end;
|Is anyone willing to have a look through this code and help debug?||25||82|
|Create a path if not exists||7||87|
|scroll down TListBox component in Delphi||1||19|
|Delphi Seattle StructureView color||1||14|