[Delphi7] Editor De Texto

[matheusguerra 3]

1º criação do editor

2º Adicionando os codigos nos butons

 

1º Parte

 

Na paleta Standartd, adicione um Memo

mude a Lines do Memo, Deixe sem nada

no Object Inspactor:

mude o Align para alClient,

e em ScrollBars coloque ssVertical, para o movimento ser vertical

 

 

2º Parte

 

Crie um panel e mude a Align para alTop

Crie tbm um OpenDialog1 e SaveDialog1, na paleta dialog

 

crie 3 button, em cima do panel

e add os codigos:

Button1

Capition = NOVO

Memo1.Clear;

 

Button2

Capition = ABRIR

if Opendialog1.Execute then

begin

memo1.Lines.LoadFromFile(opendialog1.FileName);

memo1.SetFocus;

end;

 

Button3

Capition = SALVAR

if Savedialog1.Execute then

begin

memo1.Lines.SavetoFile(Savedialog1.FileName);

memo1.SetFocus;

end;

 

FIM.....

o link para quen ñ conseguiu fazer, ou quiser copiar

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

 

Se quiseren mais codigos

é só pedi ae :D ^^

[DragonBoss 8]

legal , mas pq por 10 button ? Oo

[matheusguerra 3]

ops, é que se for colocar todas as opçoes vai dar 10 button

vo arruma e coloca a sourse :D ^^

[Surfistinha£ 20]

muito bom mas tem que arrumar o topico que nao dar pra entender nao

 

De vez de mermo pode ser lisbox ?

[DragonBoss 8]

tipo, fico bom o tuto, mas tenta da uma explicada melhor ae, pq tem mto novato q nao vai entender bem =P, mesmo assim, legal... vlw ae

 

abraços.

[matheusguerra 3]

Surf cara acho que não

pq o listbox serve para criar listas

talvez ate de para fazer mas não seria um editor de texto :D ^^

[bidoow 0]

consegui criar

 

 

mais maninho voce esqueçeu de fala que tem que adiciona OpenDialog1 e SaveDialog1

 

memo1.Lines.LoadFromFile(opendialog1.FileName);

memo1.Lines.SavetoFile(Savedialog1.FileName);

 

VLW

[matheusguerra 3]

maws ae

é ki eu tinha acabado de aprende a faze um, e resolvi posta ante que esquecesse

acho que ja to esquecendo :D ^^

[bidoow 0]

deboa brow. se pá melhora no design da pra faze um legalzinho neah :)

[Niik 3]

Como ficaria se eu quisesse colocar um Button para abrir o Documento sendo que os diretórios estão em 2 Edits!?