[delphi-br] Marinheiro de primeira viagem...
Olá amigos, Programo há pouco tempo em delphi 7, e estou com um gde problema no qreport. Relatorio que imprime cartões em dua colunas, com dados pessoais. Tenho um Table no qual extraio dados: 1 - um campo com 6(seis) carecters, tenho que extrair cada caracter e armazena-lo em uma variavel. esta variavél é testada através do case (1..9) para imprimir um Shape em binário. # # # # # # # # # # # # ->QrShape 8 4 2 1 8 4 2 1 8 4 2 1valores de cada shape ex: o campo com valor 005 o shape é prenchido da seguite forma: # # # # # # # ## 4 #1 0 05 Problema! Todos os cartões são preenchidos com o valor do primeiro registro ou do ultimo ou para onde eu apontar, imprime 005. já fiz um monte de testes e o resultado é o mesmo. Carlos [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Olá Pessoal, Vou mudar a minha pergunta. Como faço para imprimir em duas colunas como em etiquetas. desde já agradeço, um gde abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Olá pessoal, Eu gostaria de saber se alguem tem um exemplo de relat. de etiq. com duas colunas, usando quick, zreport, fortes report,... desde já agradeço, um gde abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Na mosca!!! muito obgdo companheiros. um gde abraço, Carlos Magno Em 16/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > se for quickreport... > > click no relatório mesmo, não nas bandas > > E Seta o Data set corretamente... > > - Original Message - > From: Carlos Magno > To: delphi-br@yahoogrupos.com.br > Sent: Monday, July 16, 2007 10:52 AM > Subject: Re: [delphi-br] Re: Novato... > > Olá pessoal, > O meu caso anterior foi resolvido com "ListForm.bd.campo.AsString". > Estou com outro probleminha. > Na minha impressao deste BD só imprime o ultimo registro. > Alguém sabe porque? > desde já agradeço. > um gde abraço, > Carlos Magno > > Em 02/07/07, Carlos <[EMAIL PROTECTED] > > escreveu: > > > > Você pode converter esta string para um inteiro. > > ex.: > > if(StrToInt(mCampo.Value) = 1) then > > Espero ter ajudado. > > Fraterno abraço. > > Carlos > > > > --- Em delphi-br@yahoogrupos.com.br > > rupos.com.br>, > > "Logos" <[EMAIL PROTECTED]> escreveu > > > > > > pegue pelo campo copy(campo.asstring,1,1) > > > - Original Message - > > > From: Carlos Magno > > > To: delphi-br@yahoogrupos.com.br > > > rupos.com.br> > > > Sent: Monday, July 02, 2007 11:28 AM > > > Subject: Re: [delphi-br] Novato... > > > > > > > > > Coloquei este codigo, na complilação nao deu erro, mas na execução > > da o > > > seguinte erro: > > > "Proj .exe raised exception Class EConverterError with message > > ''I' is not > > > valid integer value." > > > grato pela atenção, > > > Magno > > > > > > Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > > > > > > > > > VAR > > > > POS1:Char; > > > > POS2:Char; > > > > POS3:Char; > > > > etc.. > > > > BEGIN > > > > POS1:=copy(Campo.text,1,1); > > > > POS2:=copy(Campo.text,2,1); > > > > POS3:=copy(Campo.text,3,1); > > > > etc... > > > > > > > > - Original Message - > > > > From: crsmagno > > > > To: delphi-br@yahoogrupos.com.br > > > > rupos.com.br> > rupos.com.br> > > > > Sent: Monday, July 02, 2007 8:30 AM > > > > Subject: [delphi-br] Novato... > > > > > > > > Olá pessoal, > > > > Estou começando a trabalhar com delphi 7, e esbarrei em varios > > > > problemas, entre eles o que me fez parar. > > > > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). > > > > Preciso testar cada posição. > > > > se é 1 > > > > se é 2 > > > > se é 3... > > > > para isso eu preciso extrair a posição para uma variavel do tipo > > > > string. > > > > Alguém pode me ajudar? > > > > Um abraço, > > > > Magno > > > > > > > > -- > > > > > > > > No virus found in this incoming message. > > > > Checked by AVG Free Edition. > > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > > 1/7/2007 > > > > 12:19 > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > -- > > > um abraço, > > > > > > Carlos Magno > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > No virus found in this incoming message. > > > Checked by AVG Free Edition. > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > > 1/7/2007 12:19 > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > -- > um abraço, > > Carlos Magno > > [As partes desta mensagem que não continham texto foram removidas] > > [As partes desta mensagem que não continham texto foram removidas] > > > -- um abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Intalei o QReport que vem no delphi 7, com a opção install packages. eu tenho duas opções: 1 - Preview 2 - Print nas duas acontece o mesmo problema. Em 16/07/07, Rafael Jorge <[EMAIL PROTECTED]> escreveu: > > qual o gerador de relatorio que vc ta usando? > vc ta criando o relatorio como? > enviando dirato pra impressora? > usando quickrep? > rave reports? > > Em 16/07/07, Carlos Magno <[EMAIL PROTECTED] > > escreveu: > > > > Olá Erimar, > > Estou fazendo o seguinte: > > "ListForm.BD.Open; > > ListForm.BD.First; > > while not ListForm.Candidatos.Eof do" > > só lista o ultimo reg. > > um abraço, > > Carlos Magno > > > > Em 16/07/07, erimar feijo <[EMAIL > > PROTECTED] com.br>> > > escreveu: > > > > > > Provalvelmente voce deve estar no ultimo registro; De um > > > Nomedatabela.first para ir ao inicio; deve resolver. > > > > > > Carlos Magno <[EMAIL PROTECTED] > > > 40gmail.com>> escreveu: Olá > > > pessoal, > > > O meu caso anterior foi resolvido com "ListForm.bd.campo.AsString". > > > Estou com outro probleminha. > > > Na minha impressao deste BD só imprime o ultimo registro. > > > Alguém sabe porque? > > > desde já agradeço. > > > um gde abraço, > > > Carlos Magno > > > > > > Em 02/07/07, Carlos <[EMAIL PROTECTED] > > > com.br> > com.br>> > > > escreveu: > > > > > > > > Você pode converter esta string para um inteiro. > > > > ex.: > > > > if(StrToInt(mCampo.Value) = 1) then > > > > Espero ter ajudado. > > > > Fraterno abraço. > > > > Carlos > > > > > > > > --- Em delphi-br@yahoogrupos.com.br > > > > rupos.com.br> > rupos.com.br> > > rupos.com.br>, > > > > "Logos" <[EMAIL PROTECTED]> escreveu > > > > > > > > > > pegue pelo campo copy(campo.asstring,1,1) > > > > > - Original Message - > > > > > From: Carlos Magno > > > > > To: delphi-br@yahoogrupos.com.br > > > > > rupos.com.br> > rupos.com.br> > > rupos.com.br> > > > > > Sent: Monday, July 02, 2007 11:28 AM > > > > > Subject: Re: [delphi-br] Novato... > > > > > > > > > > > > > > > Coloquei este codigo, na complilação nao deu erro, mas na execução > > > > da o > > > > > seguinte erro: > > > > > "Proj .exe raised exception Class EConverterError with message > > > > ''I' is not > > > > > valid integer value." > > > > > grato pela atenção, > > > > > Magno > > > > > > > > > > Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > > > > > > > > > > > > > > > VAR > > > > > > POS1:Char; > > > > > > POS2:Char; > > > > > > POS3:Char; > > > > > > etc.. > > > > > > BEGIN > > > > > > POS1:=copy(Campo.text,1,1); > > > > > > POS2:=copy(Campo.text,2,1); > > > > > > POS3:=copy(Campo.text,3,1); > > > > > > etc... > > > > > > > > > > > > - Original Message - > > > > > > From: crsmagno > > > > > > To: > > > > > > delphi-br@yahoogrupos.com.br rupos.com.br> > rupos.com.br> > > rupos.com.br> > > > rupos.com.br> > > > > > > Sent: Monday, July 02, 2007 8:30 AM > > > > > > Subject: [delphi-br] Novato... > > > > > > > > > > > > Olá pessoal, > > > > > > Estou começando a trabalhar com delphi 7, e esbarrei em varios > > > > > > problemas, entre eles o que me fez parar. > > > > > > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). > > > > > > Preciso testar cada posição. > > > > > > se é 1 > > > > > > se é 2 > > > > > > se é 3... > > > > > > para isso eu preciso extrair a posição para uma variavel do tipo > > > > > > string. > > > > > > Alguém pode me ajudar? > > > > > > Um abraço, > > > > > > Magno > > > > > > > > > > > > --
Re: [delphi-br] Re: Novato...
Olá Erimar, Estou fazendo o seguinte: "ListForm.BD.Open; ListForm.BD.First; while not ListForm.Candidatos.Eof do" só lista o ultimo reg. um abraço, Carlos Magno Em 16/07/07, erimar feijo <[EMAIL PROTECTED]> escreveu: > > Provalvelmente voce deve estar no ultimo registro; De um > Nomedatabela.first para ir ao inicio; deve resolver. > > Carlos Magno <[EMAIL PROTECTED] > escreveu: Olá > pessoal, > O meu caso anterior foi resolvido com "ListForm.bd.campo.AsString". > Estou com outro probleminha. > Na minha impressao deste BD só imprime o ultimo registro. > Alguém sabe porque? > desde já agradeço. > um gde abraço, > Carlos Magno > > Em 02/07/07, Carlos <[EMAIL PROTECTED] > > escreveu: > > > > Você pode converter esta string para um inteiro. > > ex.: > > if(StrToInt(mCampo.Value) = 1) then > > Espero ter ajudado. > > Fraterno abraço. > > Carlos > > > > --- Em delphi-br@yahoogrupos.com.br > > rupos.com.br>, > > "Logos" <[EMAIL PROTECTED]> escreveu > > > > > > pegue pelo campo copy(campo.asstring,1,1) > > > - Original Message - > > > From: Carlos Magno > > > To: delphi-br@yahoogrupos.com.br > > > rupos.com.br> > > > Sent: Monday, July 02, 2007 11:28 AM > > > Subject: Re: [delphi-br] Novato... > > > > > > > > > Coloquei este codigo, na complilação nao deu erro, mas na execução > > da o > > > seguinte erro: > > > "Proj .exe raised exception Class EConverterError with message > > ''I' is not > > > valid integer value." > > > grato pela atenção, > > > Magno > > > > > > Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > > > > > > > > > VAR > > > > POS1:Char; > > > > POS2:Char; > > > > POS3:Char; > > > > etc.. > > > > BEGIN > > > > POS1:=copy(Campo.text,1,1); > > > > POS2:=copy(Campo.text,2,1); > > > > POS3:=copy(Campo.text,3,1); > > > > etc... > > > > > > > > - Original Message - > > > > From: crsmagno > > > > To: delphi-br@yahoogrupos.com.br > > > > rupos.com.br> > rupos.com.br> > > > > Sent: Monday, July 02, 2007 8:30 AM > > > > Subject: [delphi-br] Novato... > > > > > > > > Olá pessoal, > > > > Estou começando a trabalhar com delphi 7, e esbarrei em varios > > > > problemas, entre eles o que me fez parar. > > > > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(000001). > > > > Preciso testar cada posição. > > > > se é 1 > > > > se é 2 > > > > se é 3... > > > > para isso eu preciso extrair a posição para uma variavel do tipo > > > > string. > > > > Alguém pode me ajudar? > > > > Um abraço, > > > > Magno > > > > > > > > -- > > > > > > > > No virus found in this incoming message. > > > > Checked by AVG Free Edition. > > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > > 1/7/2007 > > > > 12:19 > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > -- > > > um abraço, > > > > > > Carlos Magno > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > No virus found in this incoming message. > > > Checked by AVG Free Edition. > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > > 1/7/2007 12:19 > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > -- > um abraço, > > Carlos Magno > > [As partes desta mensagem que não continham texto foram removidas] > > - > Novo Yahoo! Cadê? - Experimente uma nova busca. > > [As partes desta mensagem que não continham texto foram removidas] > > > -- um abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Olá pessoal, O meu caso anterior foi resolvido com "ListForm.bd.campo.AsString". Estou com outro probleminha. Na minha impressao deste BD só imprime o ultimo registro. Alguém sabe porque? desde já agradeço. um gde abraço, Carlos Magno Em 02/07/07, Carlos <[EMAIL PROTECTED]> escreveu: > > Você pode converter esta string para um inteiro. > ex.: > if(StrToInt(mCampo.Value) = 1) then > Espero ter ajudado. > Fraterno abraço. > Carlos > > --- Em delphi-br@yahoogrupos.com.br , > "Logos" <[EMAIL PROTECTED]> escreveu > > > > pegue pelo campo copy(campo.asstring,1,1) > > - Original Message - > > From: Carlos Magno > > To: delphi-br@yahoogrupos.com.br > > Sent: Monday, July 02, 2007 11:28 AM > > Subject: Re: [delphi-br] Novato... > > > > > > Coloquei este codigo, na complilação nao deu erro, mas na execução > da o > > seguinte erro: > > "Proj .exe raised exception Class EConverterError with message > ''I' is not > > valid integer value." > > grato pela atenção, > > Magno > > > > Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > > > > > > VAR > > > POS1:Char; > > > POS2:Char; > > > POS3:Char; > > > etc.. > > > BEGIN > > > POS1:=copy(Campo.text,1,1); > > > POS2:=copy(Campo.text,2,1); > > > POS3:=copy(Campo.text,3,1); > > > etc... > > > > > > - Original Message - > > > From: crsmagno > > > To: delphi-br@yahoogrupos.com.br > > > rupos.com.br> > > > Sent: Monday, July 02, 2007 8:30 AM > > > Subject: [delphi-br] Novato... > > > > > > Olá pessoal, > > > Estou começando a trabalhar com delphi 7, e esbarrei em varios > > > problemas, entre eles o que me fez parar. > > > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). > > > Preciso testar cada posição. > > > se é 1 > > > se é 2 > > > se é 3... > > > para isso eu preciso extrair a posição para uma variavel do tipo > > > string. > > > Alguém pode me ajudar? > > > Um abraço, > > > Magno > > > > > > -- > > > > > > No virus found in this incoming message. > > > Checked by AVG Free Edition. > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > 1/7/2007 > > > 12:19 > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > -- > > um abraço, > > > > Carlos Magno > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > -- > > > > > > No virus found in this incoming message. > > Checked by AVG Free Edition. > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > 1/7/2007 12:19 > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > -- um abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Caro Marcelo, Eu comentei estas linhas e executei o prog. "Proj .exe raised exception Class EConverterError with message ''I' is not valid integer value." O erro continua, isso quer dizer que o problema não está nesta função. Está faltando malícia para delphi. obgo a todos pela ajuda e atenção. vou ralar um pouco e retorno para dar noticias. um gde abraço, Carlos Magno Em 03/07/07, Marcelo - Kappesberg <[EMAIL PROTECTED]> escreveu: > > E ai Carlos, blz? > > Nao sei o que pode estar errado pra ti, o que o pessoal postou ai esta > certo... > Para pegar a posicao do caractere numa string usa-se o POS mesmo > > Entao, seguindo o teu exemplo seria algo do tipo: > > POS1:=COPY((ListForm.mtaclock.AsString),1,1); // pega o primeiro caractere > POS2:=COPY((ListForm.mtaclock.AsString),2,1); // pega o segundo caractere > ... > > lembrando que a variaver POS1 e POS2 deverao estar declaradas antes do > begin da procedure > > Procedure tal etc... > var > POS1, POS2 : string; > begin ... > > Marcelo Hörlle > [EMAIL PROTECTED] > > Marcelo Hörlle > [EMAIL PROTECTED] > > - Original Message - > From: Carlos Magno > To: delphi-br@yahoogrupos.com.br > Sent: Tuesday, July 03, 2007 9:59 AM > Subject: Re: [delphi-br] Re: Novato... > > Caros colegas agradeço a atenção. > > Talvez eu deva esplicar melhor a minha situação: > Veja: a minha tabela que está em um "QReport" (ListForm), é uma tabela > DBASE. > o name do campo a ser testado é mtaclock, que "Alfanumerico". > POS1:= String; > POS1:=copy((ListForm.mtaclock.DataField),1,1); > eu realmente não sei sei se é este o caminho, fiz pela auto ajuda do > proprio delphi. > um gde abraço, > Carlos Magno > > Em 02/07/07, Carlos <[EMAIL PROTECTED] > > escreveu: > > > > Você pode converter esta string para um inteiro. > > ex.: > > if(StrToInt(mCampo.Value) = 1) then > > Espero ter ajudado. > > Fraterno abraço. > > Carlos > > > > --- Em delphi-br@yahoogrupos.com.br > > rupos.com.br>, > > "Logos" <[EMAIL PROTECTED]> escreveu > > > > > > pegue pelo campo copy(campo.asstring,1,1) > > > - Original Message - > > > From: Carlos Magno > > > To: delphi-br@yahoogrupos.com.br > > > rupos.com.br> > > > Sent: Monday, July 02, 2007 11:28 AM > > > Subject: Re: [delphi-br] Novato... > > > > > > > > > Coloquei este codigo, na complilação nao deu erro, mas na execução > > da o > > > seguinte erro: > > > "Proj .exe raised exception Class EConverterError with message > > ''I' is not > > > valid integer value." > > > grato pela atenção, > > > Magno > > > > > > Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > > > > > > > > > VAR > > > > POS1:Char; > > > > POS2:Char; > > > > POS3:Char; > > > > etc.. > > > > BEGIN > > > > POS1:=copy(Campo.text,1,1); > > > > POS2:=copy(Campo.text,2,1); > > > > POS3:=copy(Campo.text,3,1); > > > > etc... > > > > > > > > - Original Message - > > > > From: crsmagno > > > > To: delphi-br@yahoogrupos.com.br > > > > rupos.com.br> > rupos.com.br> > > > > Sent: Monday, July 02, 2007 8:30 AM > > > > Subject: [delphi-br] Novato... > > > > > > > > Olá pessoal, > > > > Estou começando a trabalhar com delphi 7, e esbarrei em varios > > > > problemas, entre eles o que me fez parar. > > > > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). > > > > Preciso testar cada posição. > > > > se é 1 > > > > se é 2 > > > > se é 3... > > > > para isso eu preciso extrair a posição para uma variavel do tipo > > > > string. > > > > Alguém pode me ajudar? > > > > Um abraço, > > > > Magno > > > > > > > > -- > > > > > > > > No virus found in this incoming message. > > > > Checked by AVG Free Edition. > > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > > 1/7/2007 > > > > 12:19 > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > -- > > > um abraço, > > > > > > Carlos Magno > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > > > > > No virus found in this incoming message. > > > Checked by AVG Free Edition. > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > > 1/7/2007 12:19 > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > -- > um abraço, > > Carlos Magno > > [As partes desta mensagem que não continham texto foram removidas] > > [As partes desta mensagem que não continham texto foram removidas] > > > -- um abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Novato...
Caros colegas agradeço a atenção. Talvez eu deva esplicar melhor a minha situação: Veja: a minha tabela que está em um "QReport" (ListForm), é uma tabela DBASE. o name do campo a ser testado é mtaclock, que "Alfanumerico". POS1:= String; POS1:=copy((ListForm.mtaclock.DataField),1,1); eu realmente não sei sei se é este o caminho, fiz pela auto ajuda do proprio delphi. um gde abraço, Carlos Magno Em 02/07/07, Carlos <[EMAIL PROTECTED]> escreveu: > > Você pode converter esta string para um inteiro. > ex.: > if(StrToInt(mCampo.Value) = 1) then > Espero ter ajudado. > Fraterno abraço. > Carlos > > --- Em delphi-br@yahoogrupos.com.br , > "Logos" <[EMAIL PROTECTED]> escreveu > > > > pegue pelo campo copy(campo.asstring,1,1) > > - Original Message - > > From: Carlos Magno > > To: delphi-br@yahoogrupos.com.br > > Sent: Monday, July 02, 2007 11:28 AM > > Subject: Re: [delphi-br] Novato... > > > > > > Coloquei este codigo, na complilação nao deu erro, mas na execução > da o > > seguinte erro: > > "Proj .exe raised exception Class EConverterError with message > ''I' is not > > valid integer value." > > grato pela atenção, > > Magno > > > > Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > > > > > > VAR > > > POS1:Char; > > > POS2:Char; > > > POS3:Char; > > > etc.. > > > BEGIN > > > POS1:=copy(Campo.text,1,1); > > > POS2:=copy(Campo.text,2,1); > > > POS3:=copy(Campo.text,3,1); > > > etc... > > > > > > - Original Message - > > > From: crsmagno > > > To: delphi-br@yahoogrupos.com.br > > > rupos.com.br> > > > Sent: Monday, July 02, 2007 8:30 AM > > > Subject: [delphi-br] Novato... > > > > > > Olá pessoal, > > > Estou começando a trabalhar com delphi 7, e esbarrei em varios > > > problemas, entre eles o que me fez parar. > > > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). > > > Preciso testar cada posição. > > > se é 1 > > > se é 2 > > > se é 3... > > > para isso eu preciso extrair a posição para uma variavel do tipo > > > string. > > > Alguém pode me ajudar? > > > Um abraço, > > > Magno > > > > > > -- > > > > > > No virus found in this incoming message. > > > Checked by AVG Free Edition. > > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > 1/7/2007 > > > 12:19 > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > -- > > um abraço, > > > > Carlos Magno > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > -- > > > > > > No virus found in this incoming message. > > Checked by AVG Free Edition. > > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: > 1/7/2007 12:19 > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > -- um abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Novato...
Coloquei este codigo, na complilação nao deu erro, mas na execução da o seguinte erro: "Proj .exe raised exception Class EConverterError with message ''I' is not valid integer value." grato pela atenção, Magno Em 02/07/07, Alcistemas Informática <[EMAIL PROTECTED]> escreveu: > > VAR > POS1:Char; > POS2:Char; > POS3:Char; > etc.. > BEGIN > POS1:=copy(Campo.text,1,1); > POS2:=copy(Campo.text,2,1); > POS3:=copy(Campo.text,3,1); > etc... > > - Original Message - > From: crsmagno > To: delphi-br@yahoogrupos.com.br > Sent: Monday, July 02, 2007 8:30 AM > Subject: [delphi-br] Novato... > > Olá pessoal, > Estou começando a trabalhar com delphi 7, e esbarrei em varios > problemas, entre eles o que me fez parar. > Tenho um campo do tipo alfanumerico em BD, de tamanho 6(01). > Preciso testar cada posição. > se é 1 > se é 2 > se é 3... > para isso eu preciso extrair a posição para uma variavel do tipo > string. > Alguém pode me ajudar? > Um abraço, > Magno > > -- > > No virus found in this incoming message. > Checked by AVG Free Edition. > Version: 7.5.476 / Virus Database: 269.9.14/883 - Release Date: 1/7/2007 > 12:19 > > [As partes desta mensagem que não continham texto foram removidas] > > > -- um abraço, Carlos Magno [As partes desta mensagem que não continham texto foram removidas]
