Grand Chase Worlds

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Bem-Vindo a GC World !


    Criando um Editor de Texto em Delphi7

    Skeletoon Surf
    Skeletoon Surf
    Skeletoon Surf
    [E] Estágiario
    [E] Estágiario


    Mensagens : 35
    Data de inscrição : 23/03/2011
    • Mensagem nº1

    Criando um Editor de Texto em Delphi7 Empty Criando um Editor de Texto em Delphi7

    Mensagem por Skeletoon Surf Qui Mar 31, 2011 6:49 pm

    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
    Se quiseren mais codigos
    é só pedi ae
    • Ir para o topo
      Data/hora atual: Sáb maio 11, 2024 11:49 pm