forms1.pas

来自「FastScript 1.94 Full Source」· PAS 代码 · 共 13 行

{**************************}
{ FastScript v1.0          }
{ Forms demo 1             }
{**************************}

// Form1 is predefined object 
// - the main form of this application
begin
  Form1.Caption := 'It works!';
  Form1.Font.Style := fsBold + fsItalic;
  ShowMessage('Font changed');
  Form1.Font.Style := 0;
end.