TIP: Click on subject to list as thread! ANSI
echo: delphi
to: ALL
from: PAT PRIDGEN
date: 1997-03-16 10:08:00
subject: Trimming a Path String

Hi All,
    Being new to both Pascal and Delphi please bear with me.
    I'm trying to figure out how to return the directory information for
the ExecuteFile function from D1 FMXUtils Unit.
    Here's what I have so far. This works okay, but it isn't going to
work if the executable and attending files are in a different directory.
procedure TSwinMain.BtnHelpClick(Sender: TObject);
var
Directory : string ;
FullPath : string ;
lfp:integer;
l:integer;
begin
{Need to come up with better way to get
  Directory
 }
 Directory := 'e:\delphi\projects\proj1';
ExecuteFile('c:\windows\notepad.exe', 'help.txt',Directory,sw_shownormal)
end;
    I'm just trying to get a feel for this, but Pascal doesn't seem to
have some of the string handling routines that I've grown used to in QB.
Thanks for any help you can give.
.                  [ Pat Pridgen - La Grande, Oregon ]
.                          pat.pridgen@svis.org
*SignIt 2.0 #001* 
... I don't want to be literate, I just want to program!
___ Blue Wave/DOS v2.30
--- Maximus 2.02
---------------
* Origin: THE LOFT in Auburn IN 219-925-5524 & 238-3222 HST/V34+ (1:236/7)

SOURCE: echomail via exec-pc

Email questions or comments to sysop@ipingthereforeiam.com
All parts of this website painstakingly hand-crafted in the U.S.A.!
IPTIA BBS/MUD/Terminal/Game Server List, © 2025 IPTIA Consulting™.