[[BlueSteel]]

se me olvidaba..

para llamar solo vasta con hacer esto

Edit1.Text := GetUserName;