ListBox и OpenDialog срочно

[One.Love]

Ребята подскажите пожалуйста как в опен диалоге взять только имя файла, а не весь путь целиком?

И насчет листбокса, как взять с листбокса текст на выделенной строчке?
только без |||| закарючек??
Подскажите пожалуйста срочно
желательно кодом, буду очень благодаре,

[dr.Chas]

По первому вопросу
function ExtractFileName(cons t FileName:String): Strings;
Извлекает из полного имени файла его имя (с расширением)

[One.Love]

а более подробно
вот у меня:
if OpenDialog1.Execute then
begin
Edit1.Text:=OpenDialog1.FileName;
end;
а надо как?

[_SERGEYX_]

Edit1.Text:= ExtractFileName(OpenDialog1.FileNam e);

[One.Love]

Да я с этим уже разобрался, подскажите мне теперь лучше как быть с листбоксом
Меня теперь только это волнует, если пишу ListBox1.Items.Text он мне выдает весть текст из листбокса через |||| например project1.exe|||project2.exe|||итд.
если ListBox1.Items.GetText то выдает тоже самое через запятую
а как мне взять чисто текст с выделенной строчки??

[alexfree]

var
s : string;

begin
s := ListBox1.Items[ListBox1.itemIndex];

[One.Love]

все парни решил проблему.
Edit1.Text:=ListBox1.Items.Strings[ListBox1.ItemIndex];
выводит то что нужно