MARSAN Posted December 13, 2011 Report Share Posted December 13, 2011 Boa noite senhores, Tem como eu definir o icone a ser usado no atalho da minha aplicacao? Se sim , podem me mostrar como? obs: nao uso recursos. agradeço a atencao fwh 9.03+xharbour,bcc55,xdev Quote Link to comment Share on other sites More sharing options...
MARSAN Posted December 13, 2011 Author Report Share Posted December 13, 2011 Boa noite senhores, Tem como eu definir o icone a ser usado no atalho da minha aplicacao? Se sim , podem me mostrar como? obs: nao uso recursos. agradeço a atencao fwh 9.03+xharbour,bcc55,xdev Quote Link to comment Share on other sites More sharing options...
kapiaba Posted December 14, 2011 Report Share Posted December 14, 2011 Que eu saiba, somente usando recurso, voce coloca o ICONE, dentro de um arquivo.RES. Ou use um INSTALADOR de PROGRAMAS e defina o ICONE, que será o da sua aplicação no DESKTOP do windows. Abs, João Santos - São Paulo. kmt_karinha@pop.com.br joao@pleno.com.br Fone: (11) 3106-2832 / 8243-5632 - TIM FWH 2.7 - xHARBOUR WorkShop.Exe Quote Link to comment Share on other sites More sharing options...
crisvam Posted December 14, 2011 Report Share Posted December 14, 2011 citação:Boa noite senhores, Tem como eu definir o icone a ser usado no atalho da minha aplicacao? Se sim , podem me mostrar como? obs: nao uso recursos. agradeço a atencao fwh 9.03+xharbour,bcc55,xdev id=quote>id=quote>Na janela principal do seu sistema Define Icon oIcon "File \aplicação\arquivo de icon\nome.ico" Define Window oWnd Icon oIcon.... Este icone vai aparecer automaticamente no seu atalho no desktop Crisvam - xHarbour_FWH_10.11 - Whorkshop Editado por - crisvam on 14/12/2011 13:19:36 Quote Link to comment Share on other sites More sharing options...
MARSAN Posted December 14, 2011 Author Report Share Posted December 14, 2011 Ola cris, obrigado pela atencao.... Implementei a sua dica e está dando erro. cupom.000(103) Error E0030 Syntax error: "syntax error at 'ICON'" 1 error fwh 9.03+xharbour,bcc55,xdev Quote Link to comment Share on other sites More sharing options...
crisvam Posted December 14, 2011 Report Share Posted December 14, 2011 citação:Ola cris, obrigado pela atencao.... Implementei a sua dica e está dando erro. cupom.000(103) Error E0030 Syntax error: "syntax error at 'ICON'" 1 error fwh 9.03+xharbour,bcc55,xdev id=quote>id=quote>Marsan, Desculpe. Onde se ler "File \Aplicação\Arquivo de Icone\Icone.ico" Faça: File "\pasta da aplicação\Paste de icones\Nomeicone.ico" Crisvam - xHarbour_FWH_10.11 - Whorkshop Quote Link to comment Share on other sites More sharing options...
Jmsilva Posted December 14, 2011 Report Share Posted December 14, 2011 Marsan, Crie um arquivo ou inclua se vc já o tem com nome da sua aplicação, com a extensão .RC EX: aplica.rc inclua a seguinte linha: aplication_ico ICON meuico.ico obs: pode incluir a path caso o arquivo de icone esteja em outra pasta. ex: pasta\meuico.ico e salva. Adicione este arquivo em seu Projeto e compila. id=red> Quote Link to comment Share on other sites More sharing options...
MARSAN Posted December 14, 2011 Author Report Share Posted December 14, 2011 Boa noite crisvam , nao deu mais erro apos sua instrucao, porem o icone da aplicacao ficou bem pequeno ali em cima da dialog.....o que eu queria era que ao criar um atalho para minha aplicacao o icone aparecesse automaticamente. Mais mesmo assim valeu a atencao.... Jm silva, tentei fazer o .rc, porem da erro ao compilar....fiz pelo notepad e coloquei somente esta linha no arquivo:aplication_ico ICON \Sistema\BMP\SISTEMa.ico veja: Executando: C:\BCC55\BIN\brc32.exe -r -fo"C:\LABINFO\ESTOQUE\CUPOM.res" -i"C:\BCC55\include;C:\XHARBOUR\include;C:\FWH\INCLUDE;C:\xHarbour\include;C:\FWH\INCLUDE;C:\BCC55\INCLUDE;" "C:\LABINFO\ESTOQUE\CUPOM.001" Borland Resource Compiler Version 5.40 Copyright © 1990, 1999 Inprise Corporation. All rights reserved. Error CUPOM.001 1 47: Allocate failed agradeco a atencao fwh 9.03+xharbour,bcc55,xdev Quote Link to comment Share on other sites More sharing options...
JRICARTE Posted December 14, 2011 Report Share Posted December 14, 2011 EU UTILIZO UM SCRIPT VBS , PARA CRIAR O ATALHO COM O ICONE. SEGUE ABAIXO: strWorkDir ="C:\APLIC\GERANFE" strAppPath = "C:\APLIC\GERANFE\GERANFE.EXE" strIconPath = "%SystemRoot%\system32\SHELL32.dll,5" Set objShell = CreateObject("WScript.Shell") objDesktop = objShell.SpecialFolders("Desktop") Set objLink = objShell.CreateShortcut(objDesktop & "\GERANFE.lnk") objLink.Description = "NOTA FISCAL ELETRÔNICA" objLink.HotKey = "CTRL+SHIFT+X" objLink.IconLocation = "C:\APLIC\GERANFE\GERANFE.ICO" objLink.TargetPath = strAppPath objLink.WindowStyle = 3 objLink.WorkingDirectory = strWorkDir objLink.Save WScript.Quit Quote Link to comment Share on other sites More sharing options...
tavaresist Posted December 15, 2011 Report Share Posted December 15, 2011 Ola Jricart Poderia explicar com mais detalhes se possivel, como você cria o atalho de uma aplicação qualquer com esta rotina. Ex: onde ela fica, como ela é executada em que momento? Grato Tavares Quote Link to comment Share on other sites More sharing options...
CleitonSH Posted December 15, 2011 Report Share Posted December 15, 2011 Basta você colocar o Ãcone como primeiro da lista no seu arquivo RC, ou seja, o primeiro em ordem alfabética. no exemplo abaixo o Ãcone de sua aplicação será o Ãcone de nome "APRINCIPAL". APRINCIPAL BMPCARRO BMPCANO Cleiton FWH906+xHarbour, MySql, WorkShop, PellesC, FW20d+Clipper5.2+Clip53b Quote Link to comment Share on other sites More sharing options...
CleitonSH Posted December 15, 2011 Report Share Posted December 15, 2011 Basta você colocar o Ãcone como primeiro da lista no seu arquivo RC, ou seja, o primeiro em ordem alfabética. no exemplo abaixo o Ãcone de sua aplicação será o Ãcone de nome "APRINCIPAL". APRINCIPAL BMPCARRO BMPCANO Cleiton FWH906+xHarbour, MySql, WorkShop, PellesC, FW20d+Clipper5.2+Clip53b Quote Link to comment Share on other sites More sharing options...
JRICARTE Posted December 15, 2011 Report Share Posted December 15, 2011 strWorkDir ="C:\APLIC\GERANFE" -> Local onde esta a aplicação strAppPath = "C:\APLIC\GERANFE\GERANFE.EXE" -> Aplicaçâo strIconPath = "%SystemRoot%\system32\SHELL32.dll,5" Set objShell = CreateObject("WScript.Shell") objDesktop = objShell.SpecialFolders("Desktop") Set objLink = objShell.CreateShortcut(objDesktop & "\GERANFE.lnk") -> Nome do atalho objLink.Description = "NOTA FISCAL ELETRÔNICA" -> Descrição objLink.HotKey = "CTRL+SHIFT+X" -> Teclas para atalho objLink.IconLocation = "C:\APLIC\GERANFE\GERANFE.ICO" -> Caminho onde esta o Ãcone objLink.TargetPath = strAppPath objLink.WindowStyle = 3 objLink.WorkingDirectory = strWorkDir objLink.Save WScript.Quit OBS: Ao entrar na aplicação, eu verifico se já existe na área de trabalho o atalho, caso não existe, eu executo esse script, ou seja RUN CRIAATALHO.VBS. Coloco ele dentro da pasta da aplicação. Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted December 16, 2011 Report Share Posted December 16, 2011 Bom dia.. Tentei mandar o exemplo com VBS mas seu email não é válido mar_san2009@hotmail.com id=blue> Está voltando.. Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc Quote Link to comment Share on other sites More sharing options...
tavaresist Posted December 16, 2011 Report Share Posted December 16, 2011 JRICART Obrigado pela resposta. Não sei quanto ao Marsan que iniciou este post, mais pra mim resolveu definitivamente esta questão do Icone no Programa quando da instalção no computdor dos Clientes. Nos Arquivos de Recurso da Erro na compilação talvez por não usar Ide. nao tenho certeza. Mais Valeu Resolvidooooo. Grato Tavares Quote Link to comment Share on other sites More sharing options...
MARSAN Posted December 16, 2011 Author Report Share Posted December 16, 2011 Opa luis, envie por favor para san.tembra@hotmail.com Eu ainda nao consegui, mas nao uso recursos..... obrigado pela atencao. fwh 9.03+xharbour,bcc55,xdev Quote Link to comment Share on other sites More sharing options...
crisvam Posted December 17, 2011 Report Share Posted December 17, 2011 citação:Boa noite crisvam , nao deu mais erro apos sua instrucao, porem o icone da aplicacao ficou bem pequeno ali em cima da dialog.....o que eu queria era que ao criar um atalho para minha aplicacao o icone aparecesse automaticamente. Mais mesmo assim valeu a atencao.... Jm silva, tentei fazer o .rc, porem da erro ao compilar....fiz pelo notepad e coloquei somente esta linha no arquivo:aplication_ico ICON \Sistema\BMP\SISTEMa.ico veja: Executando: C:\BCC55\BIN\brc32.exe -r -fo"C:\LABINFO\ESTOQUE\CUPOM.res" -i"C:\BCC55\include;C:\XHARBOUR\include;C:\FWH\INCLUDE;C:\xHarbour\include;C:\FWH\INCLUDE;C:\BCC55\INCLUDE;" "C:\LABINFO\ESTOQUE\CUPOM.001" Borland Resource Compiler Version 5.40 Copyright © 1990, 1999 Inprise Corporation. All rights reserved. Error CUPOM.001 1 47: Allocate failed agradeco a atencao fwh 9.03+xharbour,bcc55,xdev id=quote>id=quote>Marsan, Se não aparecer no atalho, clic sobre o atalho com o botão direiro vá em propriedade, alterar icone, procurar...escolha o icone que voce colocou na sua rotina. Crisvam - xHarbour_FWH_10.11 - Whorkshop Quote Link to comment Share on other sites More sharing options...
kapiaba Posted June 2, 2016 Report Share Posted June 2, 2016 Onde eu acho esse SCRIPT VBS? O que é isso? Obg. abs. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.