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

Como Char Para String?


macro

Pergunta

haaaaaaaaaaaaaaaaaaaaa

eu queria sabe como fazer para uma string entrar onde deve entrar char...

assim como pode-se fazer para um integer entrar onde deve entrar string através de StrToFloat/FloatToStr/StrToInt/etc

o q quero fazer é o seguinte:

o conteúdo d um TEdit colocado no form deve aparecer na caixa de mensagem com um ícone qualquer.

Application.MessageBox('{conteúdo do edit}','Exemplo',MB_OK+MB_ICONERROR);

:angry: macro :angry:

841204gps@bol.com.br

Link para o comentário
Compartilhar em outros sites

5 respostass a esta questão

Posts Recomendados

  • 0

Application.MessageBox('{NAME_DO_EDIT.CAPTION}','Exemplo',MB_OK+MB_ICONERROR);

Isso vai exibir o valor da caixa de texto na sua mensagem.

Agora, quanto a mudar uma váriavel tipo string para char, isso é impossível, porque você deve saber que uma váriavel do tipo char serve para armazenar UM CARACTER APENAS, enquanto a string armazena vários caracters, então é uma coisa impossível de ser fazer.

entendeu belezinha ae???

Link para o comentário
Compartilhar em outros sites

  • 0

não não não não não!!!!!!!!!!!!!!!!

tem q ter um jeito d sair o conteudo do edit em uma caixa d mensagem!!!

o seguinte caso esta em questão!!!!

colocamos dois TEdit no Form1 e um TButton; quando eu clicar no TButton ele vai analisar se o conteudo dos dois TEdit é igual; Se NÃO for ele não faz nada, más SE for ele deve aparecer uma caixa d mensagem contendo o conteudo do Edit1.

Propriedades dos componentes:

Edit1.Text:='Testando caixa mensagem';

Edit2.Text:='Testando caixa mensagem';

O q eu diritaria:

Application.MessageBox(Edit1.Text,'Testando',MB_OK+MB_ICONERROR;

SABENDO Q [CHAR] É UMA COISA E [sTRING] É OUTRA

COMO FAZER PARA Q A LINHA D COMANDO ACIMA MOSTRE O CONTEUDO D UM LABEL OU EDIT.

==============================================

macro

841204gps@bol.com.br

Link para o comentário
Compartilhar em outros sites

  • 0

Se você jogar o conteudo desse edit numa variavel string antes de mostrar na caixa de Mensagem.... assim.. ao ives de você pegar o Edit direto você pega uma variavel...!!!!!!! ;)

Teste := Edit1.Text;

Application.MessageBox(Teste,'Testando',MB_OK+MB_ICONERROR);

Link para o comentário
Compartilhar em outros sites

  • 0
Guest Vitor Maringá

o negócio é o seguinte....

detalhe : a propriedade q mostra o valor do edit é Text e não caption certo? :P

como o comando MessageBox faz parte da API do Windows, ela só aceita Char.

E há uma função para inverter String em Char...

não...não é StrtoChar...hehehe

mas sim PChar(String)

log...

seu comando vai ficar assim:

Application.MessageBox(pChar(Edit1.text),'Exemplo',MB_OK+MB_ICONERROR);

:D

falou!

Vitor Maringá

Link para o comentário
Compartilhar em outros sites

  • 0
Guest Vitor Maringá

bom...

detalhe: a propriedade do valor de um Edit é Text...e não Caption...certo? :P

como o comando MessageBox faz parte da API do Windows, ele só aceita Char, daí o problema de você mandar Edit1.Text direto.

a solução é usar a função PCHAR(String)...que tem a função semelhante a StrtoInt mas de String para Char.

logo,

sua função fica assim:

Application.MessageBox(pChar(Edit1.text),'Exemplo',MB_OK+MB_ICONERROR);

:D

falou

Vitor Maringá

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