Pular para o conteúdo principal

Super Fluxo

Pesquisar este blog

Postagens

Não há nada aqui.

Bloco de código

procedure TSF02_Principal.OrganizarTela; var M: TMonitor; MonitorAtual: Integer; begin MonitorAtual := 0; Screen.DisableAlign; M := Screen.Monitors[MonitorAtual]; BoundsRect := M.BoundsRect; Height := M.Height - 35; TimerTela.Enabled := False; Screen.EnableAlign; DataHora; lblNomeFantasia.Width := 1200; grdItens.Width := M.Width - grdItens.Left - 30; end;

Quem sou eu

Carlos

Denunciar abuso

Tecnologia do Blogger