Valtran Silva

Como Funciona, se mencionou a respeito vai saber, manda ai?

Bom Dia. Valeu por responder amarildo. Se tem infelizmente não conheço, mais irei pesquisar mais para ver se acho. Mais tipo você sabe me informar a lógica da Foto no (BD)?

Salvar foto no Banco De Dados 03/12/2018 Delphi Galera é o seguinte, tô a muito tempo tentando aprender a Gravar uma foto no Banco de Dados mais não tive sucesso. pesquisei muito na internet, mais o problema que o que Domina é Função SQL. Não costumo trabalhar com função SQL. Uso Banco de Dados "FIREBIRD", Junto IBTABLE1, uso ele porque acho mais fácil e e o que aprendi na FAcu. Mais não teria problema nenhum em mudar um dia para SQL. Mais hoje preciso da ajuda de alguém voltado para minha realidade. 1º. Como funciona a lógica Disso. Eu gravo a foto, e Depois eu Busco Do Banco de Dados? 2º Eu tenho um cadastro de clientes com uma "DBImage" ja está setado com os valores do Grid. Quero que para cada cadastro que eu selecionar ou apenas rolar com o mouse no Grid, mude a foto automaticamente, só isso. Alguém poderia, me dar uma idéia de como funciona a lógica disso tudo?????? Não adianta pedir código, porque não tenho nenhum, estou pedindo do zero! Valeu por me ajudar

valeu galera consegui resolver. Post Finalizado

Exempllo: No código "Salvar" Ibtable1.insert; Ibtable1.fieldbyname('Nome').ASString:=Edit1.text; Ibtable1.post; Beleza aqui e só um exemplo mais o cadastro e bem completo. O que acontece, o código que eu tinha antes ficava declaro acima do "INsert" o que esse código fazia, se declarava uma variavel "COD" e o Edit1.text, recebia a variavel CODI! então toda vez que eu salvava um novo cadastro, o registro gerava automaticamente sem o usuário precisar colocar nada. Infelizmente não me lembro na epoca como eu fiz mais funcionava perfeitamente, inclusive eu usava em todas as telas de cadastro. Sem precisar mexer em Banco de dados ou tabela. Só montava o Banco de Dados. È o código fazia tudo sozinho. Espero ter explicado de uma forma coerente.

Bom Dia, Valeu Amarildo ! Estou usando o Firebird, como converto isso para minha realidade? Eu trabalho só com IBTAble!! Uma vez numa aplicação que eu fiz, tinha esse código, mais meu pc deu pau e perdi os arquivos. mais fazia uma variavel, e o Edit que o que vai receber a sequência de números, por sequência. 1 2 3 4 e assim por diante. A cada cadastro ele adiciona automaticamente no Grid. Por incrível que pareça não encontrei nada em vídeos ou artigos que me ajudasse com minha realidade que desenvolvo, SE você poder me dar uma ajuda nisso!

Pessoal, Tenho cadastro de clientes, quero que gere o Registro do cadastro Aumaticamente. Tinha esse código mais acabei perdendo, e não me lembro como faz o contador dos registros. Uso, Ibtable1

Então pessoal, quero ver como fazer uma aplicação que faz a conecção dos arquivos do celular no Computador, tem como ? Qual e a melhor forma de fazer isso?

De tanto quebrar a cabeça aqui consegui resolver, rs... Obrigado galera pela ajuda.

NomeDoArq := 'C:\1234\TV.txt'; // Arquivo Na Pasta escolhida AssignFile(Arquivo,NomeDoArq); //reset(Arquivo); //Readln(Arquivo,linha); ///////////////////////////////////////////// if fileExists(NomeDoArq) then begin Append(Arquivo) // se existir, apenas adiciona linhas } end else RewRite(Arquivo); // cria um novo se não existir } try Writeln(Arquivo, DateToStr(Now)); // data atual do micro finally CloseFile(Arquivo); end; Código correto agora

Realmente o que está dando o erro, if Strtodate(linha) > now then // begin Showmessage('Data do computador errada, acerte a data para que funcione o programa "Assistir TV Online!!'); Application.Terminate; e essa parte do código

Assim. Como posso resolver isso sérgio ?

Posso estar Equivocado nessa lógica desse código! Mais alguém pode me ajudar? Tipo quero que ele crie o Arquivo TXT dentro da pasta especificada, caso não tenha o arquivo. Mais guarde a Data atual Do Pc, lá dentro. A Lógica e que quando o programa for instalado em qualquer computador, ele armazene a data do pc, no arquivo txt

Bom Dia. Opa Desculpa, Tipo ele vai verificar se o arquivo na pasta C:// Tv Existi ai ele vai criar. Se já existir ele só vai adicionar linhas. No Caso, ele adiciona a Data Atual Do Pc, Que esta armazenado na variavel arquivo. WriteLn(arquivo,datetostr(now)); // data atual do micro o erro deve que e nessa linha aqui, mais não sei como converter Arquivo esta declaro como TexFile