Icones com GTWVT/GTWVW
Moderador: Moderadores
-
Rogerio_SG
- Usuário Nível 1

- Mensagens: 36
- Registrado em: 23 Nov 2004 16:40
Icones com GTWVT/GTWVW
Alguem sabe usar resource files (*.rc/*.res) para adiconar icones com GTWVT/GTWVW???
Eu consigo likar os .rc e eles aparecem na tabela de recursos do executavel, porem nao consigo chama-los dentro do .prg.
Eu consigo likar os .rc e eles aparecem na tabela de recursos do executavel, porem nao consigo chama-los dentro do .prg.
-
culik
-
Rogerio_SG
- Usuário Nível 1

- Mensagens: 36
- Registrado em: 23 Nov 2004 16:40
-
culik
Culik
Vamos falar sério !
Você quer tirar onda com minha cara ou o que ?
Se quiser tire diretamente, meu telefone é 81 3361.0627 / 81 8808.6541
Marcelo
Vamos falar sério !
Você quer tirar onda com minha cara ou o que ?
Se quiser tire diretamente, meu telefone é 81 3361.0627 / 81 8808.6541
Marcelo
Programador que é programador, quando tá de folga vai inventar função nova, fazer testes, ou seja... se divertir
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)
Cobra 210 - Drive de 8" 1.024 KB - 64 KB RAM - Impressora de Linha Cobra - Visicalc - Fortran - Dialog - Sistema Operacional SP/M (é sp/m mesmo - era o cp/m da cobra)
- vagucs
- Membro Master

- Mensagens: 1480
- Registrado em: 10 Jul 2004 10:45
- Localização: Ipanema - MG
- Contato:
Amigo Luiz,
Se houver mais alguma referência ao seu News, estarei entrando em contato com todos os moderadores e estarei pedindo a desativação do seu usuário.
Nos temos trabalhado muito e a muitos anos para poder melhorar e sempre estar atualizando este fórum, mas não para vcs venham e suguem estes usuários, o News está lá no xHarbour.org, se alguém quiser vai usar, não fique divulgando ele aqui.
Se houver mais alguma referência ao seu News, estarei entrando em contato com todos os moderadores e estarei pedindo a desativação do seu usuário.
Nos temos trabalhado muito e a muitos anos para poder melhorar e sempre estar atualizando este fórum, mas não para vcs venham e suguem estes usuários, o News está lá no xHarbour.org, se alguém quiser vai usar, não fique divulgando ele aqui.
-
Rogerio_SG
- Usuário Nível 1

- Mensagens: 36
- Registrado em: 23 Nov 2004 16:40
culik escreveu:Ola
muito simples
no RC
100 icon arquivo.ico
200 icon arquivo.ico
300 icon arquivo.ico
para usar no .prg
wvw_seticon(,100 /*id do icone */)
[]s
Luiz
Este recurso seria para por um icone na barra de titulo
o que é este RC ?? Para usar a função wvw_seticon() ele seria necessario ?? :f
C:\Xharbour\Xdev\Fw\VSX
- sygecom
- Administrador

- Mensagens: 7131
- Registrado em: 21 Jul 2006 10:12
- Localização: Alvorada-RS
- Contato:
Vc pode definir diversas coisa pelo ARQUIVO.RC no meu caso, uso ele para icones, bitmap, versão do sistema e etc...abaixo um exemplo:
Basta criar o arquivo.rc como se fosse um TXT e dar o nome dele no HBMAKE em Resourse file name:
Abraços
Leonardo Machado
Código: Selecionar todos
application_ico ICON res\sagi.ico
1 24 "res\WindowsXP.Manifest"
ICON_1 ICON res\sagi.ico
1001 BITMAP res\sagi.bmp
1 VERSIONINFO
FILEVERSION 5,0,37,0
PRODUCTVERSION 5,0,37,0
FILEOS 0x4
FILETYPE 0x1
{
BLOCK "StringFileInfo"
{
BLOCK "040904b0"
{
VALUE "FileDescription", "S.A.G.I(Sistema de Auto Gestão Integrado)\000"
VALUE "FileVersion", "5.0.0.0\000"
VALUE "InternalName", "Projeto Sagi_xHarbour\000"
VALUE "LegalCopyright", "Sygecom Informática Ltda\000"
VALUE "LegalTrademarks", "SAGI / SYGECOM\000"
VALUE "OriginalFilename", "SAGI5.EXE"
VALUE "CompanyName", "Sygecom Informática Ltda\000"
VALUE "ProductName", "S.A.G.I(Sistema de Auto Gestão Integrado\000"
VALUE "ProductVersion", "5.0.0.1\000"
VALUE "Comments", "Sistema Desenvolvido Pela Sygecom Informática - sygecom@sygecom.com.br - www.sygecom.com.br - Programador Responsavel.: Leonardo Machado \000"
}
}
BLOCK "VarFileInfo"
{
VALUE "Translation", 0x0409 0x04B0
}
}
Abraços
Leonardo Machado
Leonardo Machado
xHarbour.org + Hwgui + PostgreSql
xHarbour.org + Hwgui + PostgreSql
-
microvolution
- Usuário Nível 5

- Mensagens: 1231
- Registrado em: 02 Set 2011 22:17
- Contato:
Icones com GTWVT/GTWVW/GTINFO dentro da HMG/WVG
boa tarde!sygecom escreveu:Vc pode definir diversas coisa pelo ARQUIVO.RC no meu caso, uso ele para icones, bitmap, versão do sistema e etc...abaixo um exemplo:
fórum/tópico antigo, mas, achei interessante.
estou compilando um sistema usando a HMG 3.5.
Atualmente compilo via ide/hmg e o ícone aparece normalmente.
Estou aprendendo a compilar via .BAT pra não ficar dependente da compilação F5 da lib.
Por isso, estamos aprendendo a compilar de 2 outras formas:
- usando um .BAT que chama o HBMK2.exe (Dica do professor JQuintas);
- usando um .BAT que chama o BUILD.bat (dica do Dr. Claudio Soto).
Então, nessas compilações ocorreram algumas coisas, uma delas, que na compilação via BUILD.BAT da HMG o ícone da aplicação não mais aparece no .EXE final.
O comando que uso para que o ÍCONE seja carregado dentro do .EXE sem precisar ficar numa pasta à parte é:
Código: Selecionar todos
hb_gtInfo( HB_GTI_ICONRES, "AppIcon" )Vou tentar compilar acrescentado essas versões do meu sistema etc...sygecom escreveu:Vc pode definir diversas coisa pelo ARQUIVO.RC no meu caso, uso ele para icones, bitmap, versão do sistema e etc...abaixo um exemplo:
quem sabe dá certo e agrega mais valores à minha aplicação como NOME DO AUTOR, etc...
Mas, ao compilar com as alterações sugeridas pelo nobre professor SYGECOM, sequer compilou, pois apresentou erro:
Código: Selecionar todos
WINDRES: _temp.rc:113: syntax error
Harbour 3.2.0dev (r2011030937)
Copyright (c) 1999-2020, https://harbour.github.io/
windres.exe: SISTEMA.RC:36: syntax error
hbmk2[SISTEMA]: Erro: Ao executar o compilador de recursos. 1
Código: Selecionar todos
VALUE "Translation", 0x0409 0x04B0alguém sabe resolver, 14 anos após o último comentário hmg 3.5 (com mingW/harbour 3.2)?
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!
Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
MICROVOLUTION - 16 anos Evoluindo Com Você!
Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
- JoséQuintas
- Administrador

- Mensagens: 20267
- Registrado em: 26 Fev 2007 11:59
- Localização: São Paulo-SP
Icones com GTWVT/GTWVW
Existe uma forma correta de preencher, se preencher errado não vai.microvolution escreveu:Onde está o erro da linha 36?
Supondo que pode estar usando algo que precisa várias linhas, e supondo que exista um formato pra isso...
Vai dar erro em cada linha, porque tá faltando alguma coisa.
Pense no Harbour:
Código: Selecionar todos
DO WHILE ! EOF()
IF .T.
DO CASE
RETURN
E conforme for apagando, vai dar erro na linha anterior.
Não é exatamente a linha que está errada, precisa acertar o conjunto.
E tem coisas que o mingw não aceita.... por exemplo telas prontas.
José M. C. Quintas
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
Harbour 3.2, mingw, gtwvg mt, fivewin 25.04, multithread, dbfcdx, MySQL, ADOClass, PDFClass, SefazClass, (hwgui mt), (hmg3), (hmg extended), (oohg), PNotepad, ASP, stored procedure, stored function, Linux (Flagship/harbour 3.2)
"The world is full of kings and queens, who blind our eyes and steal our dreams Its Heaven and Hell"
https://github.com/JoseQuintas/
-
microvolution
- Usuário Nível 5

- Mensagens: 1231
- Registrado em: 02 Set 2011 22:17
- Contato:
Icones com GTWVT/GTWVW
Eliminei essas linhas e funcionou em parte. quando passo o mouse sobre o .EXE já aparece 3 informações, o que antes não apareceriam. Mas, no propriedades do .EXE item DETALHES, aparece alguma informação, em VERSÕES ANTERIORES, nada aparece.sygecom escreveu: 28
29 BLOCK "VarFileInfo"
30 {
31 VALUE "Translation", 0x0409 0x04B0
32 }
veja(m) as imagens: em VERSÕES ANTERIORES não apareceu nenhuma informação em DETALHES, faltou:
- NOME DO PRODUTO;
- VERSÃO DO PRODUTO;
- DIREITOS AUTORAIS. ao parar o mouse sobre o executável, já aparecem 3 informações. talvez falte uma ou outra, mas, já está de bom para quem não tinha informação alguma.
Grato,
MICROVOLUTION - 16 anos Evoluindo Com Você!
Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!
MICROVOLUTION - 16 anos Evoluindo Com Você!
Você já leu a Bíblia hoje?
João 3:16 - Porque Deus amou ao mundo de tal maneira que deu seu Único Filho para que todo aquele que nEle crê não pereça mas tenha a Vida Eterna!

