Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Test WMF Test.wmf
BRCC32 Test.rc
{$R Test.res}
procedure TForm1.ExtractFile;
var
RS: TResourceStream;
begin
RS := TResourceStream.Create(0, 'Test', 'WMF');
RS.SaveToFile('C:\Test.wmf');
RS.Free;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ExtractFile;
end;