José, Obrigado pela ajuda!

mas devido a urgencia, vou mudar a definição de char para String mesmo, vai
ser mais simples!

Obrigado.

2006/4/3, José Henrique (Zote) <[EMAIL PROTECTED]>:
>
>  Blz, não lembro se já tem algo pronto (imagino que sim).
>
> Se você quiser, podemos criar 2 funções pra fazer isso...
>
>
> --
> José Henrique (Zote)
>
> -----Mensagem original-----
> De: [email protected] [mailto:[EMAIL PROTECTED] Em
> nome de Carlos Delfino Carvalho Pinheiro
> Enviada em: segunda-feira, 3 de abril de 2006 17:09
>
> Para: [email protected]
> Assunto: Re: [delphi-br] Ajuda por favor, como converter uma string em um
> array de 2 chars e vise versa!
>
>
> José, acho que não me espressei bem!
>
> Preciso de algo mais transparente! como AutoBoxing! ou Cast!
>
> Mesmo assim o codigo sugerido pode gerar erro, uma vez que se S: String
> tiver somente um caracter, este irá emitir erro por acessar um array maior
> que 1.
>
> Obrigado.
>
> 2006/4/3, José Henrique (Zote) <[EMAIL PROTECTED]>:
> >
> >  Não sei se alguém já respondeu, mas lá vai:
> >
> > Var
> >   Situa: TIdSituacao;
> >   S: string; // Simula a string que veio do banco
> > begin
> >   Situa[0] := s[1];
> >   Situa[1] := s[2];
> > end;
> >
> > Abraço
> > --
> > José Henrique (Zote)
> > -----Mensagem original-----
> > De: [email protected] [mailto:[EMAIL PROTECTED]
> Em
> > nome de Carlos Delfino Carvalho Pinheiro
> > Enviada em: quinta-feira, 30 de março de 2006 17:16
> > Para: [email protected]
> > Assunto: [delphi-br] Ajuda por favor, como converter uma string em um
> > array de 2 chars e vise versa!
> >
> >
> > Bons dias pessoal!
> >
> > Estou precisando com muita urgência de resolver este problema, eu criei
> um
> > tipo TIdSituacao = array[0..1] of char, mas e as variáveis que forem
> deste
> > tipo vai receber do banco de dados um sql type char(2), mas o delphi me
> > entrega este dado como sendo string, como posso fazer a conversão?
> >
> > Obrigado.
> >
> > --
> > Carlos Delfino
> > Consultoria e Pesquisa
> > Desenvolvimento de Softwares.
> > Sun Certified Associate for Java Platform
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> > Received: (qmail 78361 invoked by uid 0); 30 Mar 2006 17:16:41 -0300
> > Received: from 66.94.237.35 by poseidon.bludata.com.br (envelope-from
> > <sentto-1058778-137782-1143749762-zote=
> > [EMAIL PROTECTED]>, uid 0) with qmail-scanner-1.25
> > (clamdscan: 0.85/974. spamassassin: 3.0.2.
> > Clear:RC:0(66.94.237.35):SA:0(-1.3/5.0):.
> > Processed in 13.69862 secs); 30 Mar 2006 20:16:41 -0000
> > X-Qmail-Scanner-Mail-From: sentto-1058778-137782-1143749762-zote=
> > [EMAIL PROTECTED] via poseidon.bludata.com.br
> > X-Qmail-Scanner: 1.25 (Clear:RC:0(66.94.237.35):SA:0(-1.3/5.0):.
> Processed
> > in 13.69862 secs)
> > Received: from unknown (HELO n1a.bullet.scd.yahoo.com) (66.94.237.35)
> >   by poseidon.bludata.com.br with SMTP; 30 Mar 2006 17:16:28 -0300
> > Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
> > DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;
> >
> >
> b=DA7Ip31AVA1os4Ppyy2+IeJdCMW8hit2H9BGFiEqgKPcftDwHKuzMNQci5eUq6TyruAEA0C7YkWzsVyGRcm9wj+3Bw+y9QEVFz9tB90IYt3bjiu/xuAx1fupo82D44;
> > Received: from [66.218.69.6] by n1.bullet.scd.yahoo.com with NNFMP; 30
> Mar
> > 2006 20:16:03 -0000
> > Received: from [66.218.66.34] by t6.bullet.scd.yahoo.com with NNFMP; 30
> > Mar 2006 20:16:03 -0000
> > X-Yahoo-Newman-Property: groups-email
> > X-Sender: [EMAIL PROTECTED]
> > X-Apparently-To: [email protected]
> > Received: (qmail 86959 invoked from network); 30 Mar 2006 20:16:01 -0000
> > Received: from unknown (66.218.66.217)
> >   by m28.grp.scd.yahoo.com with QMQP; 30 Mar 2006 20:16:01 -0000
> > Received: from unknown (HELO pproxy.gmail.com) (64.233.166.176)
> >   by mta2.grp.scd.yahoo.com with SMTP; 30 Mar 2006 20:16:01 -0000
> > Received: by pproxy.gmail.com with SMTP id d42so1606987pyd
> >         for <[email protected]>; Thu, 30 Mar 2006 12:16:00
> > -0800 (PST)
> > Received: by 10.65.81.16 with SMTP id i16mr73526qbl;
> >         Thu, 30 Mar 2006 12:15:59 -0800 (PST)
> > Received: by 10.64.148.15 with HTTP; Thu, 30 Mar 2006 12:15:59 -0800
> (PST)
> > Message-ID: <[EMAIL PROTECTED]
> >
> > To: [email protected]
> > X-Originating-IP: 64.233.166.176
> > X-eGroups-Msg-Info: 1:12:0:0
> > From: "Carlos Delfino Carvalho Pinheiro" <[EMAIL PROTECTED]>
> > X-Yahoo-Profile: carlosdelfinojava
> > Sender: [email protected]
> > MIME-Version: 1.0
> > Mailing-List: list [email protected]; contact
> > [EMAIL PROTECTED]
> > Delivered-To: mailing list [email protected]
> > List-Id: <delphi-br.yahoogrupos.com.br>
> > Precedence: bulk
> > List-Unsubscribe: <mailto:[EMAIL PROTECTED]>
> > Date: Thu, 30 Mar 2006 17:15:59 -0300
> > Subject: [delphi-br] Ajuda por favor, como converter uma string em um
> > array de 2 chars e vise versa!
> > Reply-To: [email protected]
> > Content-Type: text/plain; charset=O-8859-1
> > Content-Transfer-Encoding: quoted-printable
> > X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on
> >       poseidon.bludata.com.br
> > X-Spam-Level:
> > X-Spam-Status: No, score=.5 required=0 tests=L,BAYES_00,RCVD_BY_IP,
> >       RCVD_IN_BL_SPAMCOP_NET autolearn= version=0.2
> >
> >
> > Bons dias pessoal!
> >
> > Estou precisando com muita urgência de resolver este problema, eu criei
> um
> > tipo TIdSituacao = array[0..1] of char, mas e as variáveis que forem
> deste
> > tipo vai receber do banco de dados um sql type char(2), mas o delphi me
> > entrega este dado como sendo string, como posso fazer a conversão?
> >
> > Obrigado.
> >
> > --
> > Carlos Delfino
> > Consultoria e Pesquisa
> > Desenvolvimento de Softwares.
> > Sun Certified Associate for Java Platform
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >  --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> >
> >
> > ------------------------------
> > *Links do Yahoo! Grupos*
>
> >
> >    - Para visitar o site do seu grupo na web, acesse:
> >    http://br.groups.yahoo.com/group/delphi-br/
> >
> >    - Para sair deste grupo, envie um e-mail para:
> >    [EMAIL PROTECTED]<
> [EMAIL PROTECTED]>
>
> >
> >    - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> >    Serviço do Yahoo! <http://br.yahoo.com/info/utos.html>.
>
> >
> >
>
>
> --
> Carlos Delfino
> Consultoria e Pesquisa
> Desenvolvimento de Softwares.
> Sun Certified Associate for Java Platform
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
> Received: (qmail 4507 invoked by uid 0); 3 Apr 2006 17:09:08 -0300
> Received: from 66.94.237.36 by poseidon.bludata.com.br (envelope-from
> <sentto-1058778-137986-1144094920-zote=
> [EMAIL PROTECTED]>, uid 0) with qmail-scanner-1.25
>
> (clamdscan: 0.85/974. spamassassin: 3.0.2.
>  Clear:RC:0(66.94.237.36):SA:0(-1.3/5.0):.
> Processed in 8.52204 secs); 03 Apr 2006 20:09:08 -0000
> X-Qmail-Scanner-Mail-From: sentto-1058778-137986-1144094920-zote=
> [EMAIL PROTECTED] via poseidon.bludata.com.br
> X-Qmail-Scanner: 1.25 (Clear:RC:0(66.94.237.36):SA:0(-1.3/5.0):. Processed
> in 8.52204 secs)
> Received: from unknown (HELO n2a.bullet.scd.yahoo.com) (66.94.237.36)
>   by poseidon.bludata.com.br with SMTP; 3 Apr 2006 17:09:00 -0300
>
> Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
> DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;
>
> b=B6EsE2fww6m1r+qT5k2TgkHC/nWxfqyUCX4l1k/E3kf9Lv6irzKqrs/iDvP6JGqEwxG7xQBK8Bsaxt9j3kVuMNShLl/7J3B+l9aizScJoGUDPF/xvr/12dat5UQNx4;
> Received: from [66.218.69.5] by n2.bullet.scd.yahoo.com with NNFMP; 03 Apr
> 2006 20:08:40 -0000
> Received: from [66.218.66.93] by t5.bullet.scd.yahoo.com with NNFMP; 03
> Apr 2006 20:08:40 -0000
>
> X-Yahoo-Newman-Property: groups-email
> X-Sender: [EMAIL PROTECTED]
> X-Apparently-To: [email protected]
> Received: (qmail 88930 invoked from network); 3 Apr 2006 20:08:38 -0000
> Received: from unknown (66.218.66.216)
>   by m33.grp.scd.yahoo.com with QMQP; 3 Apr 2006 20:08:38 -0000
> Received: from unknown (HELO zproxy.gmail.com) (64.233.162.202)
>   by mta1.grp.scd.yahoo.com with SMTP; 3 Apr 2006 20:08:38 -0000
> Received: by zproxy.gmail.com with SMTP id z3so1036624nzf
>         for <[email protected]>; Mon, 03 Apr 2006 13:08:34
> -0700 (PDT)
> Received: by 10.65.159.10 with SMTP id l10mr369674qbo;
>         Mon, 03 Apr 2006 13:08:34 -0700 (PDT)
> Received: by 10.64.148.15 with HTTP; Mon, 3 Apr 2006 13:08:34 -0700 (PDT)
> Message-ID: <[EMAIL PROTECTED]>
>
> To: [email protected]
> In-Reply-To: <[EMAIL PROTECTED]>
> References: <[EMAIL PROTECTED]>
>       <[EMAIL PROTECTED]>
> X-Originating-IP: 64.233.162.202
>
> X-eGroups-Msg-Info: 1:12:0:0
> From: "Carlos Delfino Carvalho Pinheiro" <[EMAIL PROTECTED]>
> X-Yahoo-Profile: carlosdelfinojava
> Sender: [email protected]
> MIME-Version: 1.0
> Mailing-List: list [email protected]; contact
> [EMAIL PROTECTED]
> Delivered-To: mailing list [email protected]
> List-Id: <delphi-br.yahoogrupos.com.br>
> Precedence: bulk
> List-Unsubscribe: <mailto:[EMAIL PROTECTED]>
> Date: Mon, 3 Apr 2006 17:08:34 -0300
> Subject: Re: [delphi-br] Ajuda por favor, como converter uma string em um
> array de 2 chars e vise versa!
>
> Reply-To: [email protected]
> Content-Type: text/plain; charset=O-8859-1
> Content-Transfer-Encoding: quoted-printable
> X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on
>       poseidon.bludata.com.br
> X-Spam-Level:
> X-Spam-Status: No, score=.5 required=0 tests=L,BAYES_00,RCVD_BY_IP,
>       RCVD_IN_BL_SPAMCOP_NET autolearn= version=0.2
>
> José, acho que não me espressei bem!
>
> Preciso de algo mais transparente! como AutoBoxing! ou Cast!
>
> Mesmo assim o codigo sugerido pode gerar erro, uma vez que se S: String
> tiver somente um caracter, este irá emitir erro por acessar um array maior
> que 1.
>
> Obrigado.
>
> 2006/4/3, José Henrique (Zote) <[EMAIL PROTECTED]>:
> >
> >  Não sei se alguém já respondeu, mas lá vai:
> >
> > Var
> >   Situa: TIdSituacao;
> >   S: string; // Simula a string que veio do banco
> > begin
> >   Situa[0] := s[1];
> >   Situa[1] := s[2];
> > end;
> >
> > Abraço
> > --
> > José Henrique (Zote)
> > -----Mensagem original-----
> > De: [email protected] [mailto:[EMAIL PROTECTED]
> Em
> > nome de Carlos Delfino Carvalho Pinheiro
> > Enviada em: quinta-feira, 30 de março de 2006 17:16
> > Para: [email protected]
> > Assunto: [delphi-br] Ajuda por favor, como converter uma string em um
> > array de 2 chars e vise versa!
> >
> >
> > Bons dias pessoal!
> >
> > Estou precisando com muita urgência de resolver este problema, eu criei
> um
> > tipo TIdSituacao = array[0..1] of char, mas e as variáveis que forem
> deste
> > tipo vai receber do banco de dados um sql type char(2), mas o delphi me
> > entrega este dado como sendo string, como posso fazer a conversão?
> >
> > Obrigado.
> >
> > --
> > Carlos Delfino
> > Consultoria e Pesquisa
> > Desenvolvimento de Softwares.
> > Sun Certified Associate for Java Platform
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> > Received: (qmail 78361 invoked by uid 0); 30 Mar 2006 17:16:41 -0300
> > Received: from 66.94.237.35 by poseidon.bludata.com.br (envelope-from
> > <sentto-1058778-137782-1143749762-zote=
> > [EMAIL PROTECTED]>, uid 0) with qmail-scanner-1.25
> > (clamdscan: 0.85/974. spamassassin: 3.0.2.
> > Clear:RC:0(66.94.237.35):SA:0(-1.3/5.0):.
> > Processed in 13.69862 secs); 30 Mar 2006 20:16:41 -0000
> > X-Qmail-Scanner-Mail-From: sentto-1058778-137782-1143749762-zote=
> > [EMAIL PROTECTED] via poseidon.bludata.com.br
> > X-Qmail-Scanner: 1.25 (Clear:RC:0(66.94.237.35):SA:0(-1.3/5.0):.
> Processed
> > in 13.69862 secs)
> > Received: from unknown (HELO n1a.bullet.scd.yahoo.com) (66.94.237.35)
> >   by poseidon.bludata.com.br with SMTP; 30 Mar 2006 17:16:28 -0300
> > Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
> > DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;
> >
> >
> b=DA7Ip31AVA1os4Ppyy2+IeJdCMW8hit2H9BGFiEqgKPcftDwHKuzMNQci5eUq6TyruAEA0C7YkWzsVyGRcm9wj+3Bw+y9QEVFz9tB90IYt3bjiu/xuAx1fupo82D44;
> > Received: from [66.218.69.6] by n1.bullet.scd.yahoo.com with NNFMP; 30
> Mar
> > 2006 20:16:03 -0000
> > Received: from [66.218.66.34] by t6.bullet.scd.yahoo.com with NNFMP; 30
> > Mar 2006 20:16:03 -0000
> > X-Yahoo-Newman-Property: groups-email
> > X-Sender: [EMAIL PROTECTED]
> > X-Apparently-To: [email protected]
> > Received: (qmail 86959 invoked from network); 30 Mar 2006 20:16:01 -0000
> > Received: from unknown (66.218.66.217)
> >   by m28.grp.scd.yahoo.com with QMQP; 30 Mar 2006 20:16:01 -0000
> > Received: from unknown (HELO pproxy.gmail.com) (64.233.166.176)
> >   by mta2.grp.scd.yahoo.com with SMTP; 30 Mar 2006 20:16:01 -0000
> > Received: by pproxy.gmail.com with SMTP id d42so1606987pyd
> >         for <[email protected]>; Thu, 30 Mar 2006 12:16:00
> > -0800 (PST)
> > Received: by 10.65.81.16 with SMTP id i16mr73526qbl;
> >         Thu, 30 Mar 2006 12:15:59 -0800 (PST)
> > Received: by 10.64.148.15 with HTTP; Thu, 30 Mar 2006 12:15:59 -0800
> (PST)
> > Message-ID: <[EMAIL PROTECTED]
> >
> > To: [email protected]
> > X-Originating-IP: 64.233.166.176
> > X-eGroups-Msg-Info: 1:12:0:0
> > From: "Carlos Delfino Carvalho Pinheiro" <[EMAIL PROTECTED]>
> > X-Yahoo-Profile: carlosdelfinojava
> > Sender: [email protected]
> > MIME-Version: 1.0
> > Mailing-List: list [email protected]; contact
> > [EMAIL PROTECTED]
> > Delivered-To: mailing list [email protected]
> > List-Id: <delphi-br.yahoogrupos.com.br>
> > Precedence: bulk
> > List-Unsubscribe: <mailto:[EMAIL PROTECTED]>
> > Date: Thu, 30 Mar 2006 17:15:59 -0300
> > Subject: [delphi-br] Ajuda por favor, como converter uma string em um
> > array de 2 chars e vise versa!
> > Reply-To: [email protected]
> > Content-Type: text/plain; charset=O-8859-1
> > Content-Transfer-Encoding: quoted-printable
> > X-Spam-Checker-Version: SpamAssassin 3.0.2 (2004-11-16) on
> >       poseidon.bludata.com.br
> > X-Spam-Level:
> > X-Spam-Status: No, score=.5 required=0 tests=L,BAYES_00,RCVD_BY_IP,
> >       RCVD_IN_BL_SPAMCOP_NET autolearn= version=0.2
> >
> >
> > Bons dias pessoal!
> >
> > Estou precisando com muita urgência de resolver este problema, eu criei
> um
> > tipo TIdSituacao = array[0..1] of char, mas e as variáveis que forem
> deste
> > tipo vai receber do banco de dados um sql type char(2), mas o delphi me
> > entrega este dado como sendo string, como posso fazer a conversão?
> >
> > Obrigado.
> >
> > --
> > Carlos Delfino
> > Consultoria e Pesquisa
> > Desenvolvimento de Softwares.
> > Sun Certified Associate for Java Platform
> >
> >
> > [As partes desta mensagem que não continham texto foram removidas]
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> > Links do Yahoo! Grupos
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >
> >  --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> >
> >
> >
> >
> > ------------------------------
> > *Links do Yahoo! Grupos*
>
> >
> >    - Para visitar o site do seu grupo na web, acesse:
> >    http://br.groups.yahoo.com/group/delphi-br/
> >
> >    - Para sair deste grupo, envie um e-mail para:
> >    [EMAIL PROTECTED]<
> [EMAIL PROTECTED]>
>
> >
> >    - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
> >    Serviço do Yahoo! <http://br.yahoo.com/info/utos.html>.
>
> >
> >
>
>
> --
> Carlos Delfino
> Consultoria e Pesquisa
> Desenvolvimento de Softwares.
> Sun Certified Associate for Java Platform
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
> Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
>  --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
>
> ------------------------------
> *Links do Yahoo! Grupos*
>
>    - Para visitar o site do seu grupo na web, acesse:
>    http://br.groups.yahoo.com/group/delphi-br/
>
>    - Para sair deste grupo, envie um e-mail para:
>    [EMAIL PROTECTED]<[EMAIL PROTECTED]>
>
>    - O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
>    Serviço do Yahoo! <http://br.yahoo.com/info/utos.html>.
>
>


--
Carlos Delfino
Consultoria e Pesquisa
Desenvolvimento de Softwares.
Sun Certified Associate for Java Platform


[As partes desta mensagem que não continham texto foram removidas]



-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

<*> Para ver as mensagens antigas, acesse:
    http://br.groups.yahoo.com/group/delphi-br/messages

<*> Para falar com o moderador, envie um e-mail para:
    [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 


Responder a