Total de visitas: 2735
|
PROGRAMAÇÃO
PROGRAMAÇÃO EM C
Introdução
A linguagem C é uma linguagem estruturada, ou seja,
é formada por blocos chamados de funções.
Um programa em C é formado por uma coleção de funções.
Em um programa bem escrito cada função executa apenas uma tarefa.
Cada função tem um nome e uma lista de argumentos que a mesma receberá.
Exemplo:
{ exemplo1.c }
#include
int main()
{
printf("Olá mundo"); //Imprimirá "Olá mundo"
}
Informações importantes:
os programas escritos em C sempre começam pela função principal main()
o corpo do programa fica entre {}
as variáveis são declaradas depois da abertura do bloco da função "{".
Obs.: As variáveis devem sempre ser declaradas no início das funções
a linguagem C é case sensitive, ou seja,
maiúsculas são diferenciadas de minúsculas.
Ex.: int x; é diferente de int X;
as instruções terminam com ;
Termos comuns:
Tempo de compilação: os eventos ocorrem enquanto seu programa está sendo compilado.
Tempo de execução: os eventos ocorrem quando seu programa está sendo executado.
Biblioteca: é um arquivo contento as funções padrão que seu programa poderá usar. Ex.: sdtio.h
Código fonte: é o texto de um programa que o usuário pode ler, comumente chamado programa.
_________________________________________________
*************************************************
DELPHI - CRONOMETRO
private
TimeOld:TDateTime;
{ Private declarations }
public
{ Public declarations }
end;
...
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Label1.Caption := FormatDateTime('HH:MM:SS:ZZZ', TimeOld - NOW);
Application.ProcessMessages;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Label1.Caption := '00:00:00:000';
TimeOld := Now;
end;
procedure TForm1.BtnAtivDesClick(Sender: TObject);
begin
with TButton(Sender) do
begin
case TButton(Sender).Tag of
0:begin
Timer1.Enabled := True;
Caption := 'Desativar';
Tag := 1;
end;
1:begin
Timer1.Enabled := False;
Caption := 'Ativar';
Tag := 0;
end;
end;//case
end;//with
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
TimeOld := Now;
Label1.Caption := '00:00:00:000';
end;
end.
|
|
