procedure TForm1.FormCreate(Sender: TObject);
begin
Top := Screen.WorkAreaHeight - Height;
Left := Screen.WorkAreaWidth - Width;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Top := Screen.WorkAreaHeight - Height;
Left := Screen.WorkAreaWidth - Width;
end;