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

Duvida basica 2


Antonio Maucyr Pasqualli F

Pergunta

Prezados

Estou com duas duvidas básicas sobre Delphi:

1 – Tenho um Edit e um Memo, como faço para que tudo que eu digitar no Edit seja “clonado” no Memo?

Isso devera ocorrer no momento que eu estiver digitando, exemplo : eu vou digitar “ola mundo” no Edit, digitei ola mun.... e no Memo já esta com ola mun...

2 – Tenho um combo box e um Button, quando eu selecionar um nome no combo box e clicar no Button ele devera carregar uma pagina web referente ao nome selecionado

Tem como fazer isso?

Se alguém conseguir me ajudar OBRIGADO!

Link para o comentário
Compartilhar em outros sites

3 respostass a esta questão

Posts Recomendados

  • 0
1 – Tenho um Edit e um Memo, como faço para que tudo que eu digitar no Edit seja “clonado” no Memo?

Isso devera ocorrer no momento que eu estiver digitando, exemplo : eu vou digitar “ola mundo” no Edit, digitei ola mun.... e no Memo já esta com ola mun...

2 – Tenho um combo box e um Button, quando eu selecionar um nome no combo box e clicar no Button ele devera carregar uma pagina web referente ao nome selecionado

Tem como fazer isso?

implementation

uses shellapi;

{$R *.DFM}


// 1 - ao digitar no edit o memo recebera os caracteres digitados

procedure TForm1.Edit1Change(Sender: TObject);
begin
   Memo1.Lines.Text := Edit1.text;
end;


// 2 - no combobox coloque os endereços ( URL ) e ao clicar num deles a pagina será aberta atraves do seu browser

procedure TForm1.ComboBox1Click(Sender: TObject);
begin
  ShellExecute(Handle, 'open', PChar(ComboBox1.Items.Strings[ComboBox1.ItemIndex]), nil, nil, SW_SHOWNORMAL);
  inherited;
end;

OBS: Sugiro que voce leia mais sobre o delphi ... procure no forum ou na Net, tem muitas apostilas que o ajudarão.

abraço

Link para o comentário
Compartilhar em outros sites

  • 0

Ok farei isso sei disso rsrssr..........., mas, poderia me ajudar com mais uma duvida?

e se eu tiver varios edits e um memo?

1 – Tenho um Edit e um Memo, como faço para que tudo que eu digitar no Edit seja “clonado” no Memo?

Isso devera ocorrer no momento que eu estiver digitando, exemplo : eu vou digitar “ola mundo” no Edit, digitei ola mun.... e no Memo já esta com ola mun...

2 – Tenho um combo box e um Button, quando eu selecionar um nome no combo box e clicar no Button ele devera carregar uma pagina web referente ao nome selecionado

Tem como fazer isso?

implementation

uses shellapi;

{$R *.DFM}


// 1 - ao digitar no edit o memo recebera os caracteres digitados

procedure TForm1.Edit1Change(Sender: TObject);
begin
   Memo1.Lines.Text := Edit1.text;
end;


// 2 - no combobox coloque os endereços ( URL ) e ao clicar num deles a pagina será aberta atraves do seu browser

procedure TForm1.ComboBox1Click(Sender: TObject);
begin
  ShellExecute(Handle, 'open', PChar(ComboBox1.Items.Strings[ComboBox1.ItemIndex]), nil, nil, SW_SHOWNORMAL);
  inherited;
end;

OBS: Sugiro que voce leia mais sobre o delphi ... procure no forum ou na Net, tem muitas apostilas que o ajudarão.

abraço

Link para o comentário
Compartilhar em outros sites

  • 0
Ok farei isso sei disso rsrssr..........., mas, poderia me ajudar com mais uma duvida?

e se eu tiver varios edits e um memo?

O codigo deve ser modificado desta maneira

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
   if key = #13 then
      Memo1.Lines.Append(Edit1.text);
end;

procedure TForm1.Edit2KeyPress(Sender: TObject; var Key: Char);
begin
   if key = #13 then
      Memo1.Lines.Append(Edit2.text);
end;

procedure TForm1.Edit3KeyPress(Sender: TObject; var Key: Char);
begin
   if key = #13 then
      Memo1.Lines.Append(Edit3.text);
end;

procedure TForm1.Edit4KeyPress(Sender: TObject; var Key: Char);
begin
   if key = #13 then
      Memo1.Lines.Append(Edit4.text);
end;

OBS: Depois de digitar no edit , ao clicar no enter o conteudo do edit passara para o memo

abraço

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,3k
    • Posts
      652,3k
×
×
  • Criar Novo...