Newsgroups : Borland : borland.public.delphi.nativeapi.win32 : 2007 Jun : Access Violation in OpenDialog
| Subject: | Access Violation in OpenDialog |
| Posted by: | "Veit Zimmermann" (zimmerma..@nvoescptarmonic-aerospace.com) |
| Date: | Tue, 19 Jun 2007 08:50:21 |
Hello
Since I didn't get any response in b.p.d.l.d.w32 I'm trying this
group. May be the subject fits this group better.
We are using D2005 Professional.
We have a problem here with the Opendialog Component. The program
listed below (only a button a label and an OpenDialog) causes an
Access violation when the tool tip of a file in the OpenDialog
appears, but only after the second or third time the OD is opened.
I know, we're not the first one having this problem and it is most
likely in the Windows API / explorer part of OD, but has someone a
hint on how to find out what is happening?
It only occurs on two of our machines and it also occurs on these
machines if we compile it on a diferent machine. One of the machines
has not Delphi installed. Some of the machines, on which it runs OK,
do have Delphi installed, some not.
Any help would be GREATLY appreciated.
Veit
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms, Dialogs, StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
Label1: TLabel;
OpenDialog1: TOpenDialog;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
Opendialog1.FileName:='test.acd';
if Opendialog1.Execute() then
begin
Label1.Caption := Opendialog1.FileName;
end;
end;
end.