🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: borland.public.delphi.nativeapi
Article #12201

Re: How to open a explorer to locate a known file ?

#12201
From: Martin Stoeckli
Date: Fri, 15 Nov 2002 09:12
14 lines
1264 bytes
Hello

Try this:

procedure TForm1.Button1Click(Sender: TObject);
var
  sFolderName: String;
begin
  sFolderName := 'D:\';
  ShellExecute(0, 'explore', PChar(sFolderName), nil, nil, SW_SHOWNORMAL);
end;

Best regards:
Martin
Technical Details
Message-ID: <3dd4ba54@newsgroups.borland.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!newsfeed.online.be!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail
References: <3dd4a6f5@newsgroups.borland.com>

Show Full Headers
Complete Article Headers
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f8e31,174bf1c86f5089ae
X-Google-Attributes: gidf8e31,public
X-Google-Thread: f94dd,174bf1c86f5089ae
X-Google-Attributes: gidf94dd,public
X-Google-ArrivalTime: 2002-11-15 01:32:06 PST
From: "Martin Stoeckli" <MartinStoeckli@gmx.ch>
Newsgroups: borland.public.delphi.nativeapi,borland.public.delphi.students
References: <3dd4a6f5@newsgroups.borland.com>
Subject: Re: How to open a explorer to locate a known file ?
Date: Fri, 15 Nov 2002 10:12:32 +0100
Lines: 17
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 5.50.4807.1700
X-MimeOLE: Produced By Microsoft MimeOLE V5.50.4807.1700
NNTP-Posting-Host: 62.204.125.5
Message-ID: <3dd4ba54@newsgroups.borland.com>
X-Trace: newsgroups.borland.com 1037351508 62.204.125.5 (15 Nov 2002 01:11:48 -0800)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!sn-xit-06!sn-xit-04!supernews.com!newsfeed.online.be!fu-berlin.de!news.uni-x.net!newsgroups.borland.com!not-for-mail