Ir para conteúdo
Fórum Script Brasil
  • 0

Data E Hora


Colcci

Pergunta

Sei que vai parecer brincadeira, mas alguém tem como me explicar como coloco data e hora em um statusbar

Ou seja o statusbar vai ser separado

dai nessa separa a data e a hora

Obrigado

Link para o comentário
Compartilhar em outros sites

6 respostass a esta questão

Posts Recomendados

  • 0

Você cria a status bar e depois cria dois TStatusPanel, você também tem de criar um timer nele você coloca o seguinte código:

procedure TForm1.Timer1Timer(Sender: TObject);

begin

statusbar1.Panels.Items[0].Text:=timetostr(now);

statusbar1.Panels.Items[1].Text:=datetostr(now);

end;

Qualquer dúvida poste aqui, falou!

Link para o comentário
Compartilhar em outros sites

  • 0
Sei que vai parecer brincadeira, mas alguém tem como me explicar como coloco data e hora em um statusbar

Ou seja o statusbar vai ser separado

dai nessa separa a data e a hora

Obrigado

<html>

<head>

<title>Untitled Document</title>

<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">

<link href="class.css" rel="stylesheet" type="text/css">

<script language="JavaScript">

var timerID = null;

var timerRunning = false;

function startclock ()

{

stopclock();

time();

}

function stopclock ()

{

if(timerRunning)

clearTimeout(timerID);

timerRunning = false;

}

function time()

{

var now = new Date();

var ampm = (now.getHours() >= 12) ? " P.M." : " A.M."

var hours = now.getHours();

hours = ((hours > 12) ? hours - 12 : hours);

var minutes = ((now.getMinutes() < 10) ? ":0" : ":") + now.getMinutes();

var seconds = ((now.getSeconds() < 10) ? ":0" : ":") + now.getSeconds();

var Time=(hours + minutes + seconds + " " + ampm );

window.status=Time;

timerID = setTimeout("time()",1000);

timerRunning = true;

}

function clearStatus()

{

if(timerRunning)

clearTimeout(timerID);

timerRunning = false;

window.status="";

}

</script>

<head>

</head>

<body onLoad="startclock()">

<h1><marquee>Teste do Relagio</marquee></h1>

</body>

</html>

Link para o comentário
Compartilhar em outros sites

  • 0

Siga estes passos:

1) selecione a janela em que vc. quer colocar uma barra de status (por exemplo, Form1);

2) insira dentro dela o componente StatusBar (guia Win32);

3) dê um duplo clique na barra de status que vc. criou (uma janela é aberta);

4) cliquem sobre o botão ADD NEW para inserir uma divisão no panel da barra de status;

5) mantenha esse panel ainda selecionado e na propriedade WIDTH, do object inspector, digite 70 para alterar sua largura;

6) clique novamente sobre o botão ADD NEW para inserir uma nova divisão no panel da barra de status;

7) mantenha-o selecionado e deixe em branco a propriedade WIDTH;

8) selecione a sua janela (Form1);

9) na guia events do object inspector, dê um duplo-clique na caixa de texto do evento OnActivate para abrir sua procedure;

10) insira as seguintes linhas dentro da procedure:

================================================

statusbar1.Panels[0].text:= ' ' + formatdateTime(' hh:nn', Now);

statusbar1.Panels[1].text:= formatdateTime(' dddd ", " dd " de " mmmm " de " yyyy', Now);

================================================

11) selecione sua janela (Form1);

12) insira em seu interior o componente TIMER (está na guia SYSTEM);

13) selecione o componente TIMER que você acabou de inserir e altere a propriedade INTERVAL na janela do object inspector para 60000;

14) clique na guia EVENTS do object inspector;

15) dê um duplo clique na caixa de texto do evento OnTimer para abrir sua procedure;

16) digite o seguinte código:

================================================

statusbar1.Panels[0].text:= ' ' + formatdateTime(' hh:nn', Now);

================================================

Pronto...

Neste exemplo não coloquei os segundos (não sabia se vc. queria). Caso vc. queira colocá-los:

1) acrescente ":SS" dentro de FormatDateTime... Ficaria assim (...) formatdateTime(' hh:nn:ss' ....

2) mude a propriedade INTERVAL do TIMER para 1000 (assim o TIMER irá atualizar a hora a cada segundo e não a cada 60 segundos como no exemplo acima).

Abraços.

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,1k
    • Posts
      651,8k
×
×
  • Criar Novo...