danke sharky, das war mein problem...
@mario: so siehts aus... nun tuts, danke trotzdem.
Delphi-Quellcode:
var temp : integer;
var dt : TDatetime;
begin
if form1.OpenDialog1.Execute then
begin
form1.Edit2.Text := form1.OpenDialog1.FileName;
temp:= FileAge(form1.Edit2.Text);
dt:= FileDateToDateTime(temp);
form1.Label2.Caption := DateTimeToStr(dt);
end;
if form1.Label1.Caption < form1.Label2.Caption then
showmessage('1. File neuer')
else
showmessage('1. File älter');
end;