안녕하세요? 이중락 입니다.
이런...아래글에 올린거 됩니다.....
다만 이렇게 하니까 안되네요....전달인자는 중요한것 같지 않아서 뺐는데...

var
  abs, vbs: PChar;
  tmpa, tmpv: array [0..255] of Char;

begin
    tmpa := 'audio.abs';
    tmpv := 'video.vbs';
    abs := @tmpa;
    vbs := @tmpv;

    FileName(@abs, @vbs);
end;

근데 이걸 두개로 나눠서 하면 안됩니다!

begin
    RecMPEG('movie.mpg');
end;

procedure RecMPEG(filenames: String);
var
  abs, vbs: PChar;
  tmpa, tmpv: array [0..255] of Char;

begin
    tmpa := 'audio.abs';
    tmpv := 'video.vbs';
    abs := @tmpa;
    vbs := @tmpv;

    FileName(@abs, @vbs);
end;

전달인자값은 일단은 사용하지 않았습니다..테스트니까...
프로토타입을 RecMPEG()과 같이 전달인자 없이 하면 잘 되는데 RecMPEG(filenames: String)와 같이 하면 쓰레기값이 나옵니다!
참말로 신기합니다!!!
왜그럴까요?

                                       << 나이스큐~~ >>