Newsgroups : Borland : borland.public.delphi.nativeapi.win32 : 2007 Jun : Access Violation in OpenDialog

www.cryer.info
Managed Newsgroup Archive

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.

Replies:

www.cryer.info
Managed Newsgroup Archive