Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Default Location Of System 1

Status
Not open for further replies.

PaidtheUmpire

Programmer
Jan 4, 2004
105
AU
In my program I have users saving reports all over their computer, and when they come back to the system all program doesn't work because of the "system's new location"

* All i wont to do is to record the current dircetory the program is running from.
* Run my code
RvClient.ExecuteReport('Invoice');
* Use some sort of code to reset the systems default location back to what it was before my code.

Any ideas?
 
If only they were all this easy :)

Code:
var
  StartDir : String;
begin
  StartDir := ExtractFilePath(ParamStr(0));
  { run code here }
  RvClient.ExecuteReport('Invoice');
  SetCurrentDir(StartDir);
end;
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top