TSaveDialog 에서 화일을 저장할때 화일명을 시스템 시간을 읽어서 저장할때마다
다른 이름으로 저장할려면 어떻게 해야합니까 ?

void __fastcall TForm1::SaveClick(TObject *Sender)
{
String S;
TDateTime Date1=Now();
DateTimeToString(S,"yyyymmddhhmmss",Date1.CurrentDateTime());

if(SaveDialog1->Execute())
{
   ShowMessage(SaveDialog1->FileName(S+".txt"));
}
}

제가 이런식으로 버튼을 클릭할때 마다 현재시간으로 화일명을 저장하려고 하는데.
에러가 납니다. 고수님들의 도움 부탁드립니다...꾸벅.