freepascal.ru

ОС: Windows.
Есть строка (string), значение которой представляет собой путь к объекту на диске.
Как определить что представляет собой объект: папка или файл или объект вообще не существует?

Существование файла fileexist и его аналог в utf8. Примерно там же должна быть функция проверки папка это или файл. Ну или есть функция отрезающая имя файла от папки. Если имя отсутствует,то это папка.

ExtractFilePath
ExtractFileName
и прочая
-см. http://www.delphibasics.co.uk/RTL.asp?N ... ctFileName

тж.
DirectoryExists
FileExists
IncludeTrailingPathDelimiter

Stargazer44 писал(а):ОС: Windows.
Есть строка (string), значение которой представляет собой путь к объекту на диске.
Как определить что представляет собой объект: папка или файл или объект вообще не существует?

Код: Выделить всё

procedure TForm1.Button1Click(Sender: TObject);
var R: TRawByteSearchRec;
begin
  FindFirst(Edit1.Text, faAnyFile, R);
end; 

R.Attr покажет, на какой объект указывает путь и его наличие.

Если объекта нет, то R.Attr = faAnyFile = $000001FF;
Если объект есть, то, папка это faDirectory = $00000010;
Ну и т.д. смотрим { File attributes }

Основное различие между ними заключается в том, что файлы хранят данные, а папки хранят файлы и другие папки. ... Папки, часто называемые каталогами, используются для организации файлов на вашем компьютере. Сами папки практически не занимают места на жестком диске.

Stargazer44 писал(а):Есть строка (string), значение которой представляет собой путь к объекту на диске.
Как определить что представляет собой объект: папка или файл?

uses
SysUtils
................
var
s:string;
........................
if SetCurrentDir('/твой/полный/путь') = true then
s := 'это папка'
else s := ''это файл';
........................

На выбор:
DirectoryExists(FFileName)
FileGetAttr(FFileName) and faDirectory>0;