Ir para conteúdo
Fórum Script Brasil

deio

Membros
  • Total de itens

    54
  • Registro em

  • Última visita

Posts postados por deio

  1. estou trabalhando com um banco de dados do tipo DBF, usando um componente chamado TDbf, versão 6.9, e minhas dúvidas são as seguintes :

    1º) qual é a função que diz o tamanho do arquivo em bytes (Ex: 1871 Kb).

    2º) como eu faço que quando alguém usar o programa, ao abrir um opendialog e clicar em cancelar, não de erro?

    3º) como eu faço no dbgrid, ao rolar o rollover (a rodinha do mouse), o dbgrid o siga?

    4º) coloquei uma função do dbf, chamada RecNo, que informa em qual dado você está (Ex: 1567/2000), só que ocorre isso daqui quando você seleciona um item com o mouse e rola o rollover, como arruma? :

    errodbgridcu1.png

  2. minha dúvida agora, alé das citadas no post de cima, é como fazer as áreas destacadas em preto :

    imagem2ht2.png

    como fazer aparecer só as pastas e os arquivos do tipo citado, e os comando para voltar,subir uma pasta, criar uma pasta, o de modificar o shelllistview já consegui fazer ele modificar o shelllist, só falta arrumar a "estética" dele, porque ele está aparecendo como um botão normal, mas eu quero que ele fique igual a da imagem, como eu faço isso?

  3. vlw, já ajudou bastante, agora to com um probleminha, não consigo mudar de lugar o botão dentro do toolbar =\

    coloquei também um filtercombobox mas não sei como liga ele aí shelllistview =\

    outra dúvida rápida : como eu faço para um form2 que é o principal fechar junto com o form1?

    o imagelist está dando erro, eu escolho uma imagem do tipo bitmap e/ou ico e ele diz que não é válido, o que eu faço?

  4. legal, já ajudou bastante saber qual componente usar, mas como funciona esse toolbar?

    está dando erro numa função que eu fiz que um edit recebe o caption de um item selecionado no shelllistview :

    edit1.Text := shelllistview1.ItemFocused.Caption;

    o erro que diz é esse :

    "Project Project1.exe raised exception class EAccessViolation with message 'Access violation at address 004D49AB in module 'Project1.exe'.Read of address 00000024'.Process stopped(...)"

    (a janelinha que abre no forum do inserir :codebox não esta funcionando aqui, estou usando o mozilla como navegador de internet)

  5. olá, pretendo copiar a parte antes e após uma '\' em uma string, não importando o tamanho da string.

    ex: string curta : C:\SC2005\SC2005.dbf

    atring longa : C:\Documents and Settings\ANDREI\Meus documentos\Delphi\DBIII\TESTE.DBF

    (em negrito está a " \ " a qual me referia)

    desde já agradeço a ajuda de todos que postarem

  6. consegui resolver o erro que tava dando XD

    já entendi a ideia do comando de busca, agora o problema é codigo em si, pois eu sou iniciante e não entendo quase nada, a unica coisa que consegui fazer foi :

    procedure TForm3.Button1Click(Sender: TObject);

    var

    busca : variant;

    begin

    busca := edit1.text;

    datamodule6.Dbf1.SearchKey(busca,stEqual);

    end;

    só isso que eu sei fazer, falta agora ele seleciona no DBGrid o record que bate com especificações da busca.

    e pra fazer o filtro seria quase a mesma coisa, só que ao invés de selecionar o record, mostraria todos os records que batem com as especificações no DBGrid...

  7. aparece exatamente isso :

    "Project Project1.exe raised exception class EAccessViolation with message 'Access violation at adress 004B54FE in module 'Project1.exe'.Read of adress 00000058'.Process stopped..."

    depois ele mostra selecionado esta linha :

    count := datamodule6.Dbf1.RecordCount;

    é isso que esta acontecendo....

    bem, voltando ao assunto inicial do tópico, agora que eu coloquei o datamodule, como fica o código pra ele buscar no dbf e seleciona o resultado no DBGrid?

  8. consegui utilizar o datamodule, troquei todos os dbf por datamodule.dbf, só que agora ele diz que da erro onde está em negrito :

    procedure TForm1.FormCreate(Sender: TObject);

    var

    count : integer;

    begin

    count := datamodule6.Dbf1.RecordCount;

    statusbar1.Panels[0].Text :='Records ' + inttostr(count);

    statusbar1.panels[1].Text := FormatDateTime('hh:mm:ss', Now);

  9. oi pessoal, sou iniciante no delphi, e estou criando um projeto que trabalha com banco de dados do tipo .dbf

    estou com dificuldade na criação do código de procura no banco de dados, é idéia básica é a seguinte:

    Num form secundário:

    1. Ler os dados incluídos nos 12 edits que contém no form;

    2. Ao clicar num botão iniciar a buscar;

    3. Mostrar os resultados no DBGrid no form principal;

    4. Esconder o form secundário;

    desde já agradeço a todos que responderem este tópico

×
×
  • Criar Novo...