
schaukoski
Membros-
Total de itens
126 -
Registro em
-
Última visita
Tudo que schaukoski postou
-
Olá pessoal.. Gostaria de saber como que, eu espelho um bd, em tempo de execução, atualizando uma cópia desse bd, em outra máquina? Acho que na Opção do MySQL Administrator Replication tem, mas para ADD o botão está apagado... Qualquer dica ai , eu agradeço. Obrigado"
-
é isso seria manualmente. mas digo.. tem como eu fazer isso através do delphi? a data que eu estaria alterando desta forma seria a de modificação.. mas e a de criação? não tem como alterá-la de forma alguma? valeu!
-
Então cara.. eu axei aqui uma rotina para exibir exatamente o que eu precisava: var SearchFile: TSearchRec; lpSystemTime: TSystemTime; begin { arquivo } FindFirst(FileListBox1.FileName,faAnyFile,SearchFile); try { Criação } FileTimeToSystemTime (SearchFile.FindData.ftCreationTime,lpSystemTime); Edit1.text:=DateTimeToStr(SystemTimeToDateTime(lpSystemTime)); { Modificado } FileTimeToSystemTime (SearchFile.FindData.ftLastWriteTime,lpSystemTime); Edit2.text:=DateTimeToStr (SystemTimeToDateTime(lpSystemTime)); { Acessado } FileTimeToSystemTime (SearchFile.FindData.ftLastAccessTime,lpSystemTime); Edit3.text:=DateTimeToStr(SystemTimeToDateTime(lpSystemTime)); finally FindClose(SearchFile); end; eu so consigo mostrar as datas, mas.. voce disse então que não tem como alterar?, não existe essa possibilidade? obrigado
-
Obrigado pela resposta. então cara, eu não intendi muito bem não. essa rotina ele meio que "descobre" a propriedade e salva? mas e alterá-la? eu axei um pouco confuso, será que não existe uma maneira mais fácil de fazer isso?
-
Olá muito boa tarde. Pessoal estou com algumas duvidas para fazer o seguinte: eu tenho em minha tela um DirectoryListBox1, e um FileListBox1 ligado à ele. O que eu estou tentando fazer é, ao clickar em meu button, eu alterar as propriedades do arquivo selecionado no FileListBox1. Eu Queria saber os comandos para alterar mas eu já procurei e não acho, achei FileExists('c:\meusdocumentos\arquivo.doc');, e DeleteFile('c:\arquivo.doc'); mas não axei para alterar as datas eu procuro por alterar datas de: (aquelas datas que aparecem nos arquivos nas propriedades) Criado em: Modificado em: Acessado em: essas datas que eu estou tentando alterar via delphi... Abraço!!! Obrigado .. até mais!
-
Olá pessoal. Tenho a seguinte dúvida eu tenho um dbgrid pequeno, com dois campos, a hora, e o compromisso.... hora(date) compromisso(texto).... o problema é que o texto as vezes e muito grande. eu queria saber c tem compo por exemplo, quando ele parar o mouse encima da row, aparecer um balão, um hint, com o conteúdo inteiro. Abraços!.
-
Como Saber O Nº De Caracteres De Um Campo Memo(resolvido)
uma questão postou schaukoski Delphi, Kylix
Olá pessoal tenho esta rotina mas não funciona... if sdsag1mensagem.Size > 25 then begin sdsag1mena.AsString:=copy(sdsag1mensagem.asstring,1,22)+('...'); end else begin sdsag1mena.AsString:=copy(sdsag1mensagem.asstring,1,25); end; independente do tamho de caracteres que tem no campo mensagem , ele não entra na condição, eu tenho com 400 caracteres com 100 com 1 com 2 com 20 e com 25.... talvez o .size não seja o correto, alguém tem uma ideia? obs: sdsag1.mena, campo criado para mostrar o conteudo do campo mensagem da tabela que é MEMO, pois se não , no meu grid ficaria (MEMO) valeu Ola, resolvi com o BLOBSize , que é o tamanho do campo 36bits por exemplo, mas 1bit corresponde exatamente à 1 caracter o que deu muito certo! obrigado abraços! -
Olá pessoal. eestou montando um sistema de agendamento, onde o usuarios seleciona os intervalos, de horarios etc (ex: 17:30, 18:00 , 18:30). gostaria de saber como euy faço pra deixar no DBGRID, esses valores já posicionados, com o numero de registro referente ao numero de horarios.... Obrigado!
-
Olá... Pode ser uma coisa... você está usando OpenPictureDialog? se sim, você está usando também o componente VCLskin?, se sim, tem uma incompatibilidade entre esses dois componentes, tem que achar uma versao mais nova do seu VCLskin.! Abraço!
-
Shelllistview(resolvido) Vclskin(interessante)
pergunta respondeu ao schaukoski de schaukoski em Delphi, Kylix
Olá Churc, Eu vi seu exemplo, entendi, mas o problema é o seguinte. Eu não tenho um diretório específico de imagens , nem as imagens, o usuário vai selecionar do computador dele, qualquer imagem que ele queira. Entende? O que eu precisaria é fazer um OpenPictureDialog Manualmente, só que pouca coisa mais simples. OU Talvez solucionar, o porque desse conflito com meu VCLskin, já que esse OPENPICTUREDIALOG , é uim componente que já vem com o delphi, ... E, não é possível colocar um Filter no ShellListView?, eu iria precisar dele.... Também tenho dúvidas, de como capturar a imagem que eles selecionou do arquivo, e jogar para uma var. ÁAA Inclusive eu descobri, que se eu marcar no OpenPictureDialog, a Opcão OLDSTYLEDIALOG = True, o Problema desaparece.... e quando esta marcado como FALSE, ele abre o form, mas quando voce da abrir, cancelar, ou fechar, n hora que da o close da Openpicturedialog, que da um erro de access violation 00000000 ..... O VCLskin então deve ser incompatível com esse novo formato de openpicturedialog do delphi7, será que tem alguma forma de concertar isso? Acho que não né... bom... é isso Obrigado! Té-mais -
Olá. Estou com problemas no meu ShellListView... Gostaria de saber como adicionar um Filtro para, aparecerem apenas imagems. Também gostaria de saber, como faço para pegar a imagem do arquivo selecionado, e jogala em um outro Timage.. e também, adicionar um campo (igual ao openpicturedialog), para mostrar a imagem quando selecionada em um timage Obrigado.. * Eu usava um componente OpenPictureDialog, tudo funcionava normalmente, até eu descobrir que quando meu VCLskin (componente de skin), estava Ativo, a "Paisagem" do programa mudava tal, mas ao clicar em ABRIR da OpenPictureDialog, dá erro, por isso estou fazeno desta forma, se algem souber como arrumar isso também resolveria Muito! Valeu!! ______________________________________________________________________________________________ RESOLVIDO!!! Galera Muito interessante para quem tem problemas com o VCLskin Algumas versões dele, tem BUGs, que da erro em qualquer tipo de OpenDialog, Picture Dialog, etc... e apos umas 6 horas de aberto, ele também da erro ao fechar qualquer form... Depois de muito trabalho procurando como resolver isso, descobri uma forma totalemente eficiente, ao invés de deixar apenas o formonde tem a OpenDialog, com o Skin desabilitado ( o que não é muito interessante essa opção , porque qualquer chamada de form após esta modificação, todos os outros forms ficam sem Skin ). Valeu galera, Muito útil pra quem tiver vclskin com problema... até!!!!! Valeu a ajuda ai Churc Abraços
-
DB, bem isso! Era isso mesmo, Obrigado ! até!!!
-
Estranho, porque eu uso o locate, em todos os outros forms, e não dá erro algum, eu acho que está faltando algum tipo de declaração, sei lá... eu já conferi, o campo é uma variavel, que recebe o valor do campo a ser procurado, ele funciona emt doso os outros forms, e ele é uma variavel do formprincipal, onde eu situiei em relacao, na uses o formprincipal assim como nos outros forms.... não sei mais o que fazer não.. Obrigado
-
Olá, estou aqui para uma pergunta bem iniciante. Eu tenho o seguinte código dm.SDSrelacao.Locate(campo,editp.text,[locaseinsensitive,lopartialkey]); e ele da este erro : [Error] Trelacao.pas(152): Undeclared identifier: 'locaseinsensitive' [Error] Trelacao.pas(152): Undeclared identifier: 'lopartialkey' [Error] Trelacao.pas(152): Incompatible types: 'TLocateOption' and 'Integer' se eu deixar o codigo assim : dm.SDSrelacao.Locate(campo,editp.text,[]); da certo, mas eu npreciso do lopartialkey, porque esse erro "besta" ? Obrigado!
-
Olá Pessoal, Estou com esse problema. Eu preciso scanear documentos da pessoa, mas não tenho componente para isso, ou não conheço. eu usei o Twain para capturar imagem de WEBCAM, perfeito, muito bom... mas ele não detecta o driver da impressora, tem alguim componente para isso?, Obrigado! até!
-
Juntar Duas Imagens, E Gravar Como Uma Só.(resolvido)(+...)
uma questão postou schaukoski Delphi, Kylix
Olá Estou com uma dificuldade que é a seguinte. Estou fazendo cadastro de documento, de uma pessoa. O RG dela por exemplo, mas na hora que eu escaneio a foto do indivíduo, eu escaneio primero a frente,(image1), depois o verso(image2), mas eu gostaria de salvar essas duas em uma Imagem só, pra ficar mais fácil de gravar no banco de dados, pra não ter que ficar colocando TIPO , verso, inverso etc... eu tenho duas imagens escaneadas, image1, e image2... como colocar em image3 ,por exemplo, image1 all top, e image2 allbottom.... Obrigado , e até mais! ------------------------------------------------------------------------------------------------------------- RESOLVIDO!! consegui já, fiz o que voce falou Micheus, deu trabalho, mas deu certinho! Eu só estou tyeno o seguinte erro. Eu tenho meus Image( 1 e 2 ), onde eu capturo, as imagens e depois junto. Depois que eu faço isso beleza, se eu abrir novamente meu form, aquelas imagens estão lá no Timage1, e 2, ainda... Ai eu adicionei um image1.free; e image2.free;.... ok... mas depois que eu dou o free, se eu tentar colocar alguma imagem no image, ele da um erro de access violation at adress 05f12312 tal tal... image1.picture.assign(aBmp); aqui onde acontece o erro... se eu apagar o free; tudo resolve, mas se eu abrir o image dinovo vai está la a imagem anteriror, tem outra forma de resolver isso?, outro tipo de free sei lá?!, Obrigado!! até mais!!!!!! -
Opa. Não sei se ajuda, mas é uma opção.. voce talves poderia, trancar o form com o tamanho que voce quer, dai não daria pro usuário aumentar de tamanho nem maximizar... se for uma solução, eu posto pra você as propriedades do form. Abraços até logo.
-
Diminuir Tamanho De Imagem.(resolvido)
pergunta respondeu ao schaukoski de schaukoski em Delphi, Kylix
Resolvido! Eu resolvi meu problema assim: aDest:= tbitmap.create; aDest.Width := 121; aDest.Height := 97; aDest.Canvas.StretchDraw(Rect(0, 0, aDest.width, aDest.Height), image); Eu estava tentando com o seguinte código e não dava de jeito nenhum : aDest:= tbitmap.create; aDest.Canvas.StretchDraw(Rect(0, 0, 121, 97), image); Porque será? estranho, pra mim , não é a mesma coisa?! hehe Obrigado! -
Diminuir Tamanho De Imagem.(resolvido)
pergunta respondeu ao schaukoski de schaukoski em Delphi, Kylix
Ah! Sim desculpe. Eu não intendi muito bem. Então eu adiciono essa procedure no meu form. Aí, como que eu chamo a procedure? como que eu falo pra ele redimencionar? makethumbnail; ? image1.assign(aDest); A pergunta é como que eu chamo o thumbnail? , Obrigado. Desculpe, eu pderia usar, em vez dessa procedure toda, apoenas um aDest.Canvas.StretchDraw? por exemplo minhaimagem.canvas.stretchdraw(110,100); ? Obrigado -
Olá.. Estou com dúvidas sobre isto. Eu tenho uma imagem, em uma variável Image, do tipo TBitmap, . O que tem nessa variável foi capturado de uma WEBCAM, ou seja, não sei o valor de tamanho dela. Como ela estava vindo muito grande ( creio que 360x120 ), eu resolvi dar um STRETCH = True, para fikar do tamanho do meu DBImage que não é muito grande. Mas isto não resolve, porque ele diminui certinho para o tamanho do DBImage que eu tenho, mas o tamanho dela quando salvo no BD ainda é muito grande. (255kbts). Como Diminuir o tamanho dela quando ela está na variavel Image? Vou usar um método de explicação que normalmente funciona... Um Tipo exemplo: Image.Resizeto.100x80; Obrigado pela atenção!, Até mais!
-
Aham, Ele está em primeiro na lista. eu fiz mais um teste inclusive,.. eu adicionei mais um simpledataset no form, para ver se acontecia com ele também... e aconteceu . Não faço idéia do que seja, Abraços!!
-
Desculpe!, Consegui adicionar mais um filtro em FILTER< e adicionei FILTER = True... e beleza! o problmea é que meu campo tinha quer ser =(null) na verddade e não igual a 0. Obrigado.
-
Micheus, Você intendeu exatamente o que estou procurando isso mesmo... Eu estou usando SimpleDataSet, e não intendi aonde eu coloco a instrução sql? Valeu!
-
O DataModule já está como auto-create . O que mais pode ser? Abraços.
-
Converter Imagem Jpeg, Ou Jpg Para .bmp
pergunta respondeu ao schaukoski de schaukoski em Delphi, Kylix
Exatamente Micheus. era isso que eu estava procurando. excelente! "VALEU !" Até mais.