Ir para conteúdo
Fórum Script Brasil

Corposemalma

Membros
  • Total de itens

    1.393
  • Registro em

  • Última visita

Posts postados por Corposemalma

  1. ESCD é uma area de memoria que salva dados dos dispositivos(irq, dma etc...) Pra agilizar o boot e acesso a eles

    Digamos: um lugar pra guardar as configuracoes PNP, pra não ter que ficar toda hora procurando elas...

  2. oque seria o DataModule...

    me falaram pra eu usar applyupdate...

    agradeço.

    DataModule é como um Form, especializado em banco de dados e componentes de acesso para tal (pra centralizar tudo...)

    Quanto ao applyupdate tenta e ve no que dá

  3. afffff.... ainda existe pessoa que usa carta??? nosssa e-mail é de graça.... não tem que sair de casa para mandar... e ainda tem gente que utiliza carta??todo mundo manda cartas com akelas letras horriveis....que ninguém entende ao recber... e-mail não tem essas paradas bem melhor. biggrin.gif  biggrin.gif

    t+

    Cartinha é RoX.. Ainda mais quando é perfumada... UhU!

    (não da pra mandar perfume no email ainda )

    Altas moral com as menina.... tongue.gif Pra ultima mandei um livrinho infantil bem bunitinho que o titulo era o nome dela e falava uma historia de uma menina bem parecida com ela... (Algo bem diferente, ela adorou por sinal)

    wub.gifwub.gifwub.gifwub.gif

    Mas não se preocupa que eu não vou mandar uma dessas pra ninguém aqui não tongue.gif

  4. tente assim: (só um palpite)

    WinExec('COMMAND.COM /C ' + '''' + 'C:\<diretório>\abc ab.exe' + '''', SW_SHOW);
    Se você notar o que eu estou fazendo é tranformar:
    C:\<diretório>\abc ab.exe
    EM:
    "C:\<diretório>\abc ab.exe"
    Com as aspas ele não vai interpretar como parametro e vai aceitar como o nome. não tenho certeza, mas deve worká wink.gif Se não tenta trocar o
    '''' (4 Aspas) 
    por
    '"' (Duas aspas e uma dupla(trema? Sei lá o nome  :lol: ))

  5. Ae galera, alguém pode me dar uma luz?

    Baixei um demo do site, mas não consigo instalar o componente (falta um arquivo RVStyle.pas, sera que é porque não é com o source?)

    http://www.trichview.com/

    Link direto pro arquivo:

    http://www.trichview.com/rvfiles/rvpkgd7.zip

    Instalacao:

    ======================= Delphi 7 =======================

    INSTALLING COMPONENTS

    Components for Delphi 7 are in D7 directory.

    Open RVPkgD7.dpk (menu "File|Open") and click "Install" button

    in the package window.

    Repeat the steps above with RVDBPkgD7.dpk.

    dry.gif Falta o arquivo po!

    unsure.gif

  6. não sei se essa é sua dúvida... Se não for desconsidere...

    Aconselho a colocar esses códigos já prontos em uma outra unit (junto com todos os outros) Ai basta declarar essa unit que você criou no form em que vai usar um dos códigos....

    Por exemplo, essa ai basta colocar debaixo do Implementation

    e essa linha no Type

    function ChecaCEP(cCep:String; cEstado:String): Boolean;
    Depois pra usar a funcao em outra unit, basta declarar essa e usar a funcao normalmente...
    if ChecaCep(edit1.text) = true then
    bla bla bla

  7. Talvez o form_visita esteje fechado. Ou o componente que esteja com Tabstop = 0, não esteja habilitado

    E outra:

    Nessa parte do código, você tem um if para verificar se a data é numa, mas não tem o else, então a ultima linha sempre vai ser executada, não importando se a data é nula ou não..

    você não esta tendo problemas com isso?

    if datamodule1.ClientDataSet_agendaDATA.Value = NULL then
    begin
    datamodule1.ClientDataSet_agenda.Insert;
    datamodule1.ClientDataSet_agendaDATA.Value:= datetostr(datetimepicker1.Date);
    datamodule1.ClientDataSet_agendaCONSULTOR.Value:= dblookupcombobox1.Text;
    end;
    <- deveria ter um end (sem o; mesmo)
    <- deveria ter um else aqui
    <- deveria ter um begin aqui
    datamodule1.ClientDataSet_agenda.Edit;
    <- deveria ter um end aqui
    end;

    Isso para que se a data seja nula ele insira, e se não for nula ele edite wink.gif

  8. Image1.Picture.LoadFromFile(GetCurrentDir()+#);

    onde # é:

    * O componente(edit, dbedit, etc), ou

    * O campo do banco de dados(tabela.fieldbyname(NomeDaColuna).asstring)

    onde diz qual imagem é de quem....

    Por Exemplo:

    Image1.Picture.LoadFromFile(GetCurrentDir() + dados.tabela.fieldbyname('NomeImage').asstring);
  9. ola vocês podem me ajudar, tenho q fazer um discador e so acho com chamar uma conexão dial up e não com fazela , Grato smile.gif, pelo Delphi

    Se cadastra lá nesse site que tem:

    http://www.delphi.eti.br

    Olha só o que eu achei la: (mas não testei)

    {Executando uma chamada para a Conexão Dial-Up

    Insira um objeto do tipo Button definindo sua propriedade name para Button1.}

    implementation

    uses Registry;

    {$R *.DFM}

    procedure TForm1.Button1Click(Sender: TObject);

    Var

    Conexao, Executa, Conecta : string;

    Dialup : Pchar;

    reg : TRegIniFile;

    begin

    reg := TRegIniFile.create('RemoteAccess\');

    Conexao := reg.ReadString('','Default','');

    reg.free;

    Executa:='rundll32.exe rnaui.dll,RnaDial '; {executável e biblioteca do windows}

    Conecta:=Executa+Conexao; {concatena comando e nome da conexão}

    Dialup:=Pchar(Conecta); {transforma string em caractere para ser aceita pela função}

    winexec(Dialup,sw_show);

    end;

×
×
  • Criar Novo...