Miranda Postado Abril 16, 2005 Denunciar Share Postado Abril 16, 2005 Como faço para adicionar uma chave no registro assim que o arquivo for aberto !? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Progr'amador Postado Abril 16, 2005 Denunciar Share Postado Abril 16, 2005 Desculpe-me mas não entendi.Poderia reformular sua pergunta com mais detalhes?Abs. Progr'amador Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Miranda Postado Abril 16, 2005 Autor Denunciar Share Postado Abril 16, 2005 Gostaria que quando eu clicasse num botão, eu adicionasse uma chave dentro de uma pasta do registro (regedit) Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Vivendo&Aprendendo Postado Abril 16, 2005 Denunciar Share Postado Abril 16, 2005 OláFaça isso no OnClick do Botão... e adicione na clusula USES o nome REGISTRYprocedure TForm1.Button1Click(Sender: TObject); var registro: TRegistry; begin {registro:=TRegistry.Create; registro.RootKey:=HKEY_CURRENT_USER; registro.OpenKey(('Software\MeuNome\MeuPrograma\1.0'), true); registro.WriteString('Chave', Form1.Caption); registro.CloseKey; registro.Free; } end; isso gravará a chave no registro e para ler essa chave use: procedure TForm1.FormCreate(Sender: TObject); var registro: TRegistry; Reg : String; begin registro:=TRegistry.Create; registro.RootKey:=HKEY_CURRENT_USER; try registro.OpenKey(('Software\MeuNome\MeuPrograma\1.0'), false); Reg := registro.ReadString('Chave'); //Form1.Top:=registro.ReadInteger(‘Top’); registro.CloseKey; except end; registro.Free; end;Qualquer duvida posta ai...falouAlexandre - V&A Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Miranda Postado Abril 16, 2005 Autor Denunciar Share Postado Abril 16, 2005 Botei esse comando, para ao clicar no botão adicionar um registro para iniciar o programa sempre que o windows for ligado.Onde boto os dados da CHAVE?A chave não foi criada.unit Unit1;interfaceuses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Registry, StdCtrls;type TForm1 = class(TForm) Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}procedure TForm1.Button1Click(Sender: TObject);var registro: TRegistry;begin { registro:=TRegistry.Create; registro.RootKey:=HKEY_LOCAL_MACHINE; registro.OpenKey(('Software\Microsoft\Windows\CurrentVersion\Run'), true); registro.WriteString('Chave', Form1.Caption); registro.CloseKey; registro.Free; }end;end. Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Vivendo&Aprendendo Postado Abril 17, 2005 Denunciar Share Postado Abril 17, 2005 A chave é inserida no comando:Aqui você escolhe a chave registro.RootKey:=HKEY_LOCAL_MACHINE; aqui você abre a chave registro.OpenKey(('Software\Microsoft\Windows\CurrentVersion\Run'), true); e aqui você atribuios valores para a chave onde FORM1.CAPTION é o valor que será gravado registro.WriteString('Chave', Form1.Caption); aqui fecha a chave registro.CloseKey; e aqui libera o registro registro.Free; VOCÊ DEVE TIRAR OS COMANDOS DE DENTRO DAS CHAVES { }espero ter ajudado qualquer duvida posta aifalouV&A Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Miranda
Como faço para adicionar uma chave no registro assim que o arquivo for aberto !?
Link para o comentário
Compartilhar em outros sites
5 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.