くだすれDelphi(超初心者用)その57 [無断転載禁止]©2ch.net

[0465 デフォルトの名無しさん 2018/04/08(日) 19:40:43.33 ID:aHOcMh8N]

procedure TForm1.PlayBtnClick(Sender: TObject);
var
FileName1: string;
begin
mciSendString(PChar('open"' + FileName1 + '"type MEPGVideo' + 'alias MusicFile'), nil, 0, 0);
// ~~~~~~~~~~~
mciSendString(PChar('play Musicfile from 0'), nil, 0, 0);
end;

上記のチルダの部分あたりだと思うのですが…
どうしてもわかりません。