SALVAR ALTERACOES

USUARIO.EXCLUIDOS 09/07/2004 13:40:50
#32904
Olá pessoal,

Tenho uma rotina no meu projeto em que o usuário altera a picture de uma image1 com a imagem que ele quiser. A questão é: quando ele trocar a imagem, como faço para que quando ele iniciar novamente o aplicativo, a image1 venha com a imagem selecionada pelo usuário no último acesso?

Abraços...


Aloysio
WEBMASTER 09/07/2004 15:13:03
#32911
Resposta escolhida
Use GetSetting e SaveSetting, elas servem para guardar e ler informações no registro, um exemplo:

Dim Imagem As String
Imagem = GetSetting(App.Title, "Config", "Imagem", App.Path & "\imagem.jpg")
If Dir(Imagem) <> "" Then Image1.Picture = LoadPicture(Imagem)

Agora, pra salvar a Imagem, você deve colocar esse código em um botão, ou menu, que você use para o usuário configurar a imagem:

Call SaveSetting(App.Title, "Config", "Imagem", Caminho_da_Nova_Imagem)

Substitua "Caminho_da_Nova_Imagem" pela variável utilizada que guarda o caminho da Imagem.

Tente aí, qualquer coisa, é só falar!
Tópico encerrado , respostas não são mais permitidas