Jump to content
Fivewin Brasil

Caixa de Diálogo


edmar1361303188

Recommended Posts

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.

Link to comment
Share on other sites

Olá,

Vc deve estar usando algum controle da Borland, assim, vc deverá carregar a Bwcc.Dll no inicio do programa

hBorland:=LoadLibrary("Bwcc.Dll")

e quando encerrar a aplicação FreeLibrary(hBorland)

citação:

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.


id=quote>id=quote>
Link to comment
Share on other sites

citação:

Obrigado pela dica Gilmer, mas não deu certo, continua dando a mesma mensagem.

citação:

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.


id=quote>id=quote>


id=quote>id=quote>

Editado por - edmar on 23/05/2002 16:28:23

Link to comment
Share on other sites

Mostre um pouco do seu código inicial para dar uma olhada

citação:

citação:

Obrigado pela dica Gilmer, mas não deu certo, continua dando a mesma mensagem.

citação:

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.


id=quote>
id=quote>


id=quote>
id=quote>

Editado por - edmar on 23/05/2002 16:28:23


id=quote>id=quote>
Link to comment
Share on other sites

Você esta usando browse ? se sim, qual controle vc esta usando ?

citação:

citação:

Obrigado pela dica Gilmer, mas não deu certo, continua dando a mesma mensagem.

citação:

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.


id=quote>
id=quote>


id=quote>
id=quote>

Editado por - edmar on 23/05/2002 16:28:23


id=quote>id=quote>
Link to comment
Share on other sites

Aqui está meu código inicial, se for necessário envio todo o código, a DLL, e o .LNK.

#include "FiveWin.ch"

Static oJanela,oFundo,Ok:=.F.

Function Main()

Local hBorland

Set 3dLook On

SetHandleCount(100)

hBorland:=LoadLibrary("Bwcc.Dll")

*

Set Resources to "Gerente.dll"

*

If !Senha(0)

Quit

Endif

Set Resources To

Define Brush oFundo Style BORLAND

Define Window oJanela From 0,0 to 30,80 Title "VISUAL GERENTE" Brush oFundo

Activate Window oJanela Maximized

FreeLibrary(hBorland)

return(nil)

*------------------

Function Senha(arg)

*-----------------------------------------------------------

Define Dialog Senha Resource "SenhaIni"

Use Senhas

mNome:=space(len(Nome))

mSenha:=space(len(Senha))

Redefine Get mNome ID 101 of Senha Picture "@!"

Redefine Get mSenha ID 102 of Senha

Redefine Button ID 103 of Senha Action TestaSen(mNome,mSenha)

Redefine Button ID 204 of Senha Action Senha:End

Activate Dialog Senha Centered

Use

Return (Ok)

citação:

Obrigado pela dica Gilmer, mas não deu certo, continua dando a mesma mensagem.

citação:

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.


id=quote>id=quote>


id=quote>id=quote>

Editado por - edmar on 23/05/2002 16:28:23

Link to comment
Share on other sites

Olá,

No seu código vc esta desativando a DLL, veja:

Set Resources to "Gerente.dll" // Ativando

*

If !Senha(0)

Quit

Endif

Set Resources To // aqui vc esta desabilitando (provocando erro)

citação:

Aqui está meu código inicial, se for necessário envio todo o código, a DLL, e o .LNK.

#include "FiveWin.ch"

Static oJanela,oFundo,Ok:=.F.

Function Main()

Local hBorland

Set 3dLook On

SetHandleCount(100)

hBorland:=LoadLibrary("Bwcc.Dll")

*

Set Resources to "Gerente.dll"

*

If !Senha(0)

Quit

Endif

Set Resources To

Define Brush oFundo Style BORLAND

Define Window oJanela From 0,0 to 30,80 Title "VISUAL GERENTE" Brush oFundo

Activate Window oJanela Maximized

FreeLibrary(hBorland)

return(nil)

*------------------

Function Senha(arg)

*-----------------------------------------------------------

Define Dialog Senha Resource "SenhaIni"

Use Senhas

mNome:=space(len(Nome))

mSenha:=space(len(Senha))

Redefine Get mNome ID 101 of Senha Picture "@!"

Redefine Get mSenha ID 102 of Senha

Redefine Button ID 103 of Senha Action TestaSen(mNome,mSenha)

Redefine Button ID 204 of Senha Action Senha:End

Activate Dialog Senha Centered

Use

Return (Ok)

citação:

Obrigado pela dica Gilmer, mas não deu certo, continua dando a mesma mensagem.

citação:

Estou começando a utilizar o FiveWin e já me deparei com um problema, criei uma DLL utilizando o Resource WorkShop contendo uma caixa de diálogo, quando tento ativar este diálogo em meu programa dá a seguinte mensagem: Error FiveWin/3 Cannot Create Dialog Box. Não consigo ver onde está o problema.

Obs: Para chamar a DLL: Set Resources do "gerente.dll"

Para criar/executar o diálogo: Define Dialog Senha Resource "SenhaIni"

Activate Dialog Senha Centered

Desde já agradeço.


id=quote>
id=quote>


id=quote>
id=quote>

Editado por - edmar on 23/05/2002 16:28:23


id=quote>id=quote>

Link to comment
Share on other sites

esta janela de senha abre ?

citação:

Olá,

Gilmer, eu não estou desativando a DLL. Olha só!

Set Resources to "Gerente.dll" // Ativando

*

If !Senha(0) //Pulou para a função senha

Quit

Endif

Set Resources To // Depois eu desativo, pois não preciso mais

Editado por - edmar on 24/05/2002 13:49:23


id=quote>id=quote>
Link to comment
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Reply to this topic...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Loading...
×
×
  • Create New...