program Project1;uses Forms, Unit1 in 'Unit1.pas' {Form1};{$R *.res}var s:String;
begin
s:='值班系统';
Application.Initialize;
Application.Title :=s ;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.
如果嫌麻煩的話,直接用Application.Title := '值班系统 ';也可以奇怪的是,你改過之后編譯好了再改回原來的重新編譯,好像又沒有問題了,具體原因我也不是很清楚。估計是Delphi的Bug,對Unicode的支持只有Delphi2009才完全。