Oi estou tentando fazer tratamento de uma imagem(foto captada por uma câmera) e preciso aumentar a resolução da foto alguém por favor conhece um componente no delphi ou um modo que eu possa fazer isso??
Obrigada
Estou precisando de um curso de delphi completo apostilado.
MAIS INFORMAÇÕES CURSOS DE INFORMATICA EM DVD ACESSE;
http://www.quebarato.com.br/thomask8/anuncios
http://thomask8cursos.wordpress.com
Contato para envio: thomask8@gmail.com
MEGA CURSOS EM DVDs R$ 19,90 - FRETE GRATIS
VALE A PENA CONHECER!
Estou desenvolvendo um Sistema de cadastro de Clientes utilizando o banco de dados ACCESS, nele será cadastrado uma data de agendamento de consulta, cada Cliente só poderá passar de 15 em 15 dias, queria fazer uma rotina para bloquer Clientes espertinhos que tentassem passar antes dos 15 dias, como eu faria esse código amigos!!!
Olá, sou Jacqueline e estou fazendo um curso de Delphi aqui na Espanha. Tenho muitas dificuldades de encontrar livros pois estou numa cidade muito pequena. Necessitava um programa básico para guardar uma agenda pessoal (nome, endereço e telefone). Sei os comandos mas afinal nada me funciona...Estou utilizando atualmente o Delphi 6.
queria saber sobre formularios de pesquisas de idosos de abrigo
objetivo geral: analisar os principais motivos que levam o idoso se abrigar na casa de repouso São José na cidade de macapá.
com urgência
Ola , sou iniciante, eh coloquei uma pesquisa num Edit num form de cadastro de descrições, o problema eh que quando quero incluir ou editar uma descrição da um erro, ( Cannot perform this operation on an open dataset
eis o codigo
if key =#13 then
begin
screen.cursor:=crHourGlass;
QueryDescricao.close;
QueryDescricao.sql.clear;
QueryDescricao.SQL.add('Select * From CADDESCRICAO Where UPPER(DsDescricao) like :p_titulo');
QueryDescricao.sql.add('ORDER BY DsDescricao');
QueryDescricao.ParamByName('p_titulo').asString:='%'+UpperCase(Edit1.Text)+ '%';
QueryDescricao.Open;
screen.cursor:=crDefault;
edit1.Text:='';
Data: 13/11/2007 18:41
De: Gissa (gissatorres
@yahoo.com.br)
IP: 201.77.112.10
Assunto: Busca por data
Olá, pessoal
Estou com problemas quando utilizo o seguinte código na procedure de busca por data:
begin
FormatDateTime('dd-mm-yyyy',dtePlantio.Date);
try
Transacao.TransactionID := 1;
Transacao.IsolationLevel := xilREPEATABLEREAD;
dmDados.SQLConnection1.StartTransaction(Transacao);
with SimpledtsTabela do
begin
Close;
DataSet.CommandText := 'SELECT * from CULTIVO where DATA_PLANTIO = ' + DateToStr (dtePlantio.Date);
Open;
dbgPesqCultivo.Refresh;
dmDados.SQlConnection1.Commit(Transacao);
if RecordCount = 0 then
begin
MostrarTodosRegistros;
cmbGleba.SetFocus;
Exit;
end;
end;
except
on Exc:Exception do
begin
dmDados.SQLConnection1.Rollback(Transacao);
Exit;
end;
end;
end;
Recebo uma mensagem de erro.......
.....raised exception class EDatabaseError with message 'Conversion error from string'
Alguém pode me ajudar?
[]s,
Gissa
tenta adicionar na uses a unit DB ou BD naum me lembro a ordem das letras....
abs
também estou com esse problema, por favor se alguém tiver algo a respeito por favor me mande, meu e-mail é ademirjcarneiro@itelefonica.com.br
Também estou nesse dilema, se já conseguiu passa pra mim o código por favor.
Obrigado desde já.
Afrânio
Oi
gaspar
Por gentileza, estou com esse problema tambem
sou novato em Delphi
Se vdc consegui resolverm me de a dica
jorge-sousa@uol.com.br
Bom dia!
Eu estou com um probleminha... eu tento fazer consultas utilizando inner join, mas não sei se estou usando certo...
O erro q da é de q o parâmetro não foi encontrado, e eu já adicionei o parâmetro! Alguém teria alguma idéia do q eu posso ter esquecido?
Obrigada.
ola, gostaria encarecidamente q me mandassem um fonte de como eu scaneio um documento e salvo em campo especifico (exemplo: tabela_Cliente - Campo_CPF) de uma tabela pelo delphi 6. desde já agradeço vossa atenção. estou no aguardo.
Utilizei o report builder para gerar etiquetas. Na tela ele mostra certo mas qdo mando imprimir ele muda as posicoes e nao imprime todas. Alguem sabe o que pode estar errado?
Obrigada
GOSTARIA QUE ALGUEM ME MANDASSE UM FORMULARIO DE INCLUSAO EM QUE NAO DEIXA REPETIR
OS REGISTROS DESDE JA MUITO OBRIGADO
por exemplo no banco de dados : cep, se estiver em integer nao vai funcionar no maskedit. a alternativa e colocar todos os atributos q vao p/o maskedit em varchar.
teste de envio de mensagem
Valew velho, muito obrigado mesmo!!!
Ps. te add no meu MSN, se eu tiver outras dúvidas, fica mais fácil!!
Data: 05/03/2007 13:28
De: wanderbi
IP: 200.141.184.126
Assunto: Consulta
Amigos,
tenho um pequeno programa com b.dados c/tabelas paradox e preciso fazer uma consulta entre datas
usando 2 datetimerpicker.essa procura será de nome, endereço,cidade e estado dos cadastrados naquele período. coloquei um botão onde em seu evento onclick coloquei a seguinte codificação:
procedure TFrmConsulta.BitBtn1Click(Sender: TObject);
var
Inicio,Final:string;
begin
If DateTimePicker2.Date < DateTimePicker1.Date Then
begin
ShowMessage('Intervalo de datas inválido, a data inicial é maior que a data final!');
DateTimePicker2.Date := DateTimePicker1.Date;
end
Else
begin
Inicio := DateToStr(DateTimePicker1.Date);
Final := DateToStr(DateTimePicker2.Date);
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Text := 'SELECT Nome,Endereco,Municipio,Estado FROM cadastro_cliente WHERE DataBeneficio >=:pInicial and DataBeneficio<=:pFinal ORDER BY Nome';
Query1.ParamByName('pInicial').AsDateTime := StrToDate(inicio);
Query1.ParamByName('pFinal').AsDateTime := StrToDate(final);
Query1.Prepare;
Query1.Open;
DBGrid1.SetFocus
end;
Label2.Caption := 'Total de contatos: ' + IntToStr(Query1.RecordCount)
end;
O PROGRAMA COMPILA MAS QUANDO VOU USAR VEM A MENSAGEM "type milmatch in expression"
será que podem me ajudar?
