freepascal.ru

Надо загрузить на форму в объект TImage изображение, расположенное в домашнем каталоге Linux. Без привязки к конкретному имени пользователя.
Я попытался использовать следующий код:

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

prefix := '~/';
name := 'image001';
imgOne.Picture.LoadFromFile(prefix + name + '.png');

Изображение не грузится. Ошибка:

Unable to open file ' ~/image001.png'

Подскажите, пожалуйста, как решить эту проблему?

А так?

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

prefix := '~/';
name := 'image001';
imgOne.Picture.LoadFromFile(ExpandFileName(prefix + name + '.png'));

или

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

name := 'image001';
imgOne.Picture.LoadFromFile(GetUserDir+name + '.png');

Спасибо.
GetUserDir - прекрасно сработала!
Не знал о такой функции.