s3c

você já viu aquelas funções ? Elas retornam arquivos e pastas. Para o que você quer, acho que terá que utilizar essas funções dentro de uma função recursiva p/ vecrificar as sub-pastas. Uma dica é você somente ler as pastas e utilizar a função FileExists p/ localizar os arquivos desejados.

if not qryLogin.Eof then Login:= qryLogin.FieldByName('Login').asString;

Veja as funções: FindFirst FindNext FindClose Veja tb a estrutura: TSearchRec

Mas só foi um exemplo c/ h e n fixos. Em tempo de execução substitua pelos parâmetros que vierem.

Tente: Like 'h%n'

Acho que ele quer colocar o ícone no botão. Bom, se for isto: 1-Coloque um TImageList no Form. 2-Adicione os ícones no TImageList. 3-Coloque na propriedade Images da Toolbar o nome do TImageList. 4-Coloque na propriedade ImageIndex do ToolButton o índice do ícone.

Mas qual a finalidade de gravar o número serial do HD no próprio HD ?

http://info.borland.com/devsupport/delphi

Se o Windows for da família 9x, não estranharia esse erro. Se for NT ou XP, veja se você fez as atualizações dos service-packs do Windows e do Delphi.

Tente desabilitar pelo registro; procure por 'ScreenSaveActive' e deixe o valor = 0; no 2000 está em: HKEY_CURRENT_USER Control Panel Desktop

Sua aplicação está sempre em foco ?

A sua aplicação deve estar em foco para que WM_SysCommand possa ser recebida. Uma outra alternativa é você utilizar a unit Registry e zerar a chave do Screen Saver. No 2000 ela está em: HKEY_CURRENT_USER Control Panel Desktop SCRNSAVE.EXE No onCreate, zere-a; no onDestroy recoloque-a.

Poste o código que você fez.

Isso mesmo, CanModify não pode ser setada, ela inicia em false quando o Dataset está fechado e é atualizada após ser dado o Open, indicando se o Dataset é read-only ou não. Dependendo da ordenação feita, após você dar Open, a propriedade RequestLive fica em false também. Existem bancos que não deixam você editar dependendo do Select ou Order By aplicados.

Como assim ?Os métodos do tipo message são como eventos, eles acontecem por alguma causa externa que neste caso é o Windows que faz acionar sua procedure WMSysCommand; você não precisa fazer nada, é só declarar. Tanto faz. Aquele que coloquei acima não serve ?

Realmente o TImage não possui eventos de key mas você pode colocar o TImage dentro de um Listbox por exemplo: 1-Coloque um Listbox e ajuste o tamanho e posição relativos à imagem. 2-Retire suas bordas: ListBox1.BevelInner := bvNone; ListBox1.BevelOuter := bvNone; ListBox1.BorderStyle := bsNone; 3-Deixe a propriedade Style := lbOwnerDrawVariable; p/ não aparecer o pontilhado da primeira linha. 4-No onCreate do Form execute: Image1.Parent := ListBox1; Image1.Align := alClient; 5-No onClick do TImage execute: ListBox1.SetFocus; 6-No onKeyPress do Listbox cheque o ctrl+c (#3) e coloque o código que o Graymalkin sugeriu.

Esta propriedade tb é atualizada após você dar Open no dataset. Verifique se ela está ativada após o Open, verifique tb a propriedade CanModify(deve estar=true) e se os botões Insert e Delete do DBNavigator estão ativos.

Veja se suporta o Cast: Select cid_nome from CEP_PR where Cast(cid_cep as varchar(8)) like '87080%';

Antes do Windows acionar a proteção de tela, ele lança uma msg p/ quem quiser saber.Como você quer saber quando a proteção de tela irá entrar, então você deve definir uma procedure do tipo message WM_SysCommand p/ conseguir 'enxergar' essa msg. O inherited diz ao Windows p/ prosseguir c/ SC_Screensave, como não vai ser dado, então acredito que a proteção de tela não aparecerá.

A rotina de abertura e leitura do arquivo está descrita acima; só que você terá os dois campos numa única string(Linha), com isso você terá que dividir essa string nos dois campos p/ depois fazer o Insert na tabela.

Olá colega, o Windows manda uma msg do tipo WM_SysCommand informando em WParam SC_Screensave. É só você interceptá-la e não deixar seguir adiante. Defina: procedure WMSysCommand(var Msg:TMessage); message WM_SysCommand; Depois:procedure TForm1.WMSysCommand(var Msg:TMessage); begin if Msg.WParam <> SC_Screensave then inherited; end;

Procure por KDImage.

Existem bancos que dependendo da ordenação ou select feitos, não deixam você editar. Se for BDE, a propriedade RequestLive da Query deve estar = false; tente ativá-la.

Acho que você terá que achar um componente p/ ler essas imagens p/ poder convertê-las em jpg ou bmp p/ depois imprimí-las.

Olá Paulo Nobre e Graymalkin. O componente é um TDBImage ou TImage ?