Recent

Author Topic: Return All the Data to the user as a Writeln.  (Read 4250 times)

captian jaster

  • Guest
Return All the Data to the user as a Writeln.
« on: April 23, 2010, 02:51:47 pm »
Sup Guys... Been Working on a project and got stumped on this.
Code: [Select]
Function ExtractFileThings(const FileName:String):String;
BEGIN
  ExtractFileName(FileName);
  ExtractFilePath(FileName);
  ExtractFileExt(FileName);
  ExtractFiledir(FileName);
  ExtractFileDrive(FileName);
END;
Now im not sure how im gonna do this bu i want it to be able to return all of the Extracts As Writelns.. How would i get around doing this...

eny

  • Hero Member
  • *****
  • Posts: 1631
Re: Return All the Data to the user as a Writeln.
« Reply #1 on: April 23, 2010, 03:13:36 pm »
Eh?
Code: [Select]
  ...
  writeln(ExtractFileName(FileName));
  writeln(ExtractFilePath(FileName));
  etc...
All posts based on: Win10 (Win64); Lazarus 2.0.10 'stable' (x64) unless specified otherwise...

captian jaster

  • Guest
Re: Return All the Data to the user as a Writeln.
« Reply #2 on: April 23, 2010, 03:20:16 pm »
Incorrect... It says Identifier not found.
And it is part of my FFU project... SO Yeah. i think im gonna use a series of strings in a Record..
Whats your thought?

eny

  • Hero Member
  • *****
  • Posts: 1631
Re: Return All the Data to the user as a Writeln.
« Reply #3 on: April 23, 2010, 03:28:39 pm »
Incorrect... It says Identifier not found.
Not to me; works perfectly!
What identifier is missing?
Did you add sysutils to the uses list?
All posts based on: Win10 (Win64); Lazarus 2.0.10 'stable' (x64) unless specified otherwise...

captian jaster

  • Guest
Re: Return All the Data to the user as a Writeln.
« Reply #4 on: April 23, 2010, 03:42:36 pm »
HAHA dood. The Point of the code im writing is to get all of that data at once.
Its in the FFU unit.
You can
Code: [Select]
Writeln(ExtractFileDir('MyFile'));
If you use the sysutils.
But im trying to only use the FFU unit here.(which already uses sysutils.)
Ill be back on later to try and fix some stuff.

 

TinyPortal © 2005-2018