K klxklx Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-12 #1 请问各位，用image从SQL中读到图像后，我想当点击image之后，可以用看图软件打开，该怎么做啊，也可以用windows自带的，也就是把image中的图片在看图软件中显示？
K klxklx Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-12 #2 请问各位，用image从SQL中读到图像后，我想当点击image之后，可以用看图软件打开，该怎么做啊，也可以用windows自带的，也就是把image中的图片在看图软件中显示？
D dawnsong Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-13 #3 uses ...,shellapi; implementation ... procedure TForm1.Image1DblClick(Sender: TObject); const bmpFile:string ='tmp.bmp'; begin image1.Picture.SaveToFile(bmpFile); ShellExecute(self.Handle,'open',PChar(bmpFile),nil, PChar(ExtractFilePath(Application.ExeName)),SW_SHOW ); end;
uses ...,shellapi; implementation ... procedure TForm1.Image1DblClick(Sender: TObject); const bmpFile:string ='tmp.bmp'; begin image1.Picture.SaveToFile(bmpFile); ShellExecute(self.Handle,'open',PChar(bmpFile),nil, PChar(ExtractFilePath(Application.ExeName)),SW_SHOW ); end;
D delphixiaolaoda Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-22 #4 delphi上不是有个控件叫做ole 用这个就可以了 你查这个控件方面的资料,很简单的
I islet8 Unregistered / Unconfirmed GUEST, unregistred user! 2005-04-22 #5 最好是以存为临时文件的形式，然后ShellExecute()该文件来浏览比较好
