procedure TForm1.FormCreate(Sender: TObject)beginlabel1.Caption:='悄槐明岩HELLO WORD!'启槐友end加个opendialog,代码不难,应该