Topic: to capture image (jpg) of the Internet
How can I capture automatically an image (jpg) of the Internet straightly for a DBImage1?
Roberto Alencar
My Visual Database → Script → to capture image (jpg) of the Internet
How can I capture automatically an image (jpg) of the Internet straightly for a DBImage1?
Example
if HTTPGetFile('https://domain.com/image.jpg', ExtractFilePath(Application.ExeName) + 'image.jpg', False) then
begin
Form1.DBImage1.dbImageIsChanged := True;
Form1.DBImage1.Picture.LoadFromFile(ExtractFilePath(Application.ExeName) + 'image.jpg');
Form1.DBImage1.dbFileName := ExtractFilePath(Application.ExeName) + 'image.jpg';
end;
My Visual Database → Script → to capture image (jpg) of the Internet
Powered by PunBB, supported by Informer Technologies, Inc.
Theme Hydrogen by Kushi