DzinerStudio Demo

RaahGrilim

RaahGrilim

Respeito das Regras : 100%

Mensagens : 4

Agradecido : 1
Data de inscrição : 06/01/2013
Idade : 29

Eae galére...
Vamos fazer um exercício simples dando continuidade ao [Tens de ter uma conta e sessão iniciada para poderes visualizar este link]

Iremos fazer um editor de textos simples

1.1
Para começar abra o (Delphi 7) nas palhetas clique em Standart e escolha um Memo..

Spoiler:

1.2
Adicione-o e clique nele aparecendo no Object Inspector clique em Align e escolha allClient

Spoiler:

1.3
Ainda no Object Inspector vá em ScrollBars e escolha ssVertical

Spoiler:

1.4
Na palheta Standart mesmo pegue um MainMenu e coloque dentro do Form

Spoiler:

1.5
Clique nele e ira aparecer uma caixa digite o nome que deseja para cada aba no meu está Arquivos e sub-abas Novo e Sair.. a do lado Editar sub-abas Abrir e Salvar e última aba Ajuda.

Spoiler:

1.6
Clique fora da caixa e clique em Arquivos e de 2 Cliques (Dois) em Novo.

Spoiler:

1.7
Ira aparecer o Code Editor entre Begin e End;
Insira esse código: Memo1.Clear;

Spoiler:

1.8
Agora va na palheta Dialogs e pegue 1 (Um) OpenDialog e 1 (Um) SaveDialog.

Spoiler:

1.9
Volte para o Form principal e vá em na Editar e clique em Abir.

Spoiler:

1.10
No Code Editor digite o código

Código:: if OpenDialog1.Execute then begin Memo1.Lines.LoadFromFile(OpenDialog.FileName); Memo1.SetFocus; end;

Spoiler:

1.11
Agora no Form principal na aba Editar clique em Salvar.

Spoiler:

1.12
Agora com o Code Editor Aberto digite o seguinte código.

Código:: if SaveDialog1.Execute then begin Memo1.Lines.SaveToFile(SaveDialog1.FileName); Memo1.SetFocus; end;

Spoiler:

1.13
No Form principal clique em Ajuda e coloque um ShowMessage.

Código:: ShowMessage('Exercício LC')

Spoiler:

1.14
Clique em ► Run ou use F9 para ver como ficou. :)

Bom é isso galera espero que gostem e não deixem de comentar trarei mais exercícios.

Para os Preguiçosos deixarei o link de download com as sources: [Tens de ter uma conta e sessão iniciada para poderes visualizar este link]

DzinerStudio Demo

#1 [Delphi] If e suas aplicações. Dom Jan 06, 2013 10:58 pm

RaahGrilim