Assembly Coding in Delphi Problem

Hi All
I'm trying to write a piece of Assembly code in Delphi.I know I should
do this by asm keyword.I want to return Flags value to a
variable.I use the following code in the start of my Main project file:

var
Flags:DWord;
begin
asm
Pushf
Pop Flags
end;
......
end.

But this code make nothing for me and only hide caption bar and Border
of Main form.
why?How I can Do this?