ActiveDelphi

SE postar o código inteiro da função facilita o entendimento.

Mas pelo que percebi, você está sempre zerando o Registro e incrementando ele na linha, ou seja, sempre vai ser 0 + 1;

Armazena ...

Supondo que seus dados estejam em uma Query.

var
QtdRegistro : Integer;
I : Integer;
ValorUnico : String;
begin
i := 0;
//Fonte pra realizra con ...

Karina. Abra seu projeto,. depois vá em Compontes / Install Packege e verifique se algum dos componentes não estão marcados na lista. Marque os que estiver desmarcado. Salve seu DPR e tente novamen ...

Não.
Ja usei timer com tempo de 1 (1 milésimo de segundo) e nunca tive problema.
Só toma cuidado com o que for fazer com ele hehe, pra num gerar um processamento muito grande de dados em um cur ...

Tenta postar um pouco mais de informações para facilitar nosso entendimento.
Mas se eu consegui visualizar o que vc quer, basicamente vc tem que realizar uma consulta no sistema com base no usuár ...

Venho utilizando Windows desde o 98 SE.
De todos, o mais estável sem duvida é o XPzão...
O 7 também é excelente. Foi uma ótima atualização.
O Windows 8 no inicio é complexo, pois muda bas ...

DanielChrome mais essa site do https://www.iconfinder.com/ os ícones são pagos

nem todos, tem muitos pagos mesmo, mas é só filtrar por Free que vira os gratuitos, que são muitos de de qualida ...

Eu uso muito o https://www.iconfinder.com/ Só é chato quando vc quer baixar um pack. Não tem opção pra baixar todos de uma vez, tem que ir um por um. MAs tem icones excelentes.

Esta forma que postou seve pra carregar a imagem a partir de algum lugar do computador e não do banco de dados. Já a que postei anteriormente busca os dados do banco. Não é que seja a melhor forma ...

Concordo com o pessoal acima. Armazenar imagem no banco é desnecessário.

Mas se mesmo assim preferir assim. O que tem que fazer é carregar os dados é um pouco trabalhoso, mas funciona. SEgue e ...

Olá Daniel

Primeiro vocÊ precisaria fazer um Loop para pegar os registros da Query.
Depois é só ir montando o corpo do Email:

Form2.qry3.First; //ir para o primeiro registro da query ...

Seu OpenDialog não está abrindo já com algum arquivo definido por padrão? Ai, provavelmente quando testa em outra máquina, o arquivo realmente não existe e dá o erro. Poste seu código fonte pa ...

Olá Lipe.

Tente o seguinte. Na função que faz a conexão com o banco de dados:

Try
//SEu código para ativar a conexão
Conexao.Active := True;

Except
MessageDlg('N ...

Olá denisrocha

Bem, não tenho um exemplo, teria que ver mesmo sobre o consumo de WebService em Delphi e leitura de XML (normalmente uso interface construida com base nos XSDs que a Sefaz fornece) ...

if (resultado > resultado2) and (resultado <= FloatToStr(StrToFloat(resultado2)*(StrToFloat('2')))) THEN
VAR1:='2';

Vamos analisar sua condição IF:

Se Resulta ...