Jump to content
Fivewin Brasil

CTOAS

Membros
  • Posts

    1,893
  • Joined

  • Last visited

Posts posted by CTOAS

  1. 6 horas atrás, andradeinformatica2014 disse:

    Bom dia, me passa o email que te envio o xdev atualizado até para windows 10 64 bits, todas as versões, meu email é andradeinformatica@gmail.com

    Que versão é essa? O xDev Studio teve seu desenvolvimento encerrado pelo Vailton a bastante tempo e além disso a versão 0.70 que utilizo é a mesma desde de que o Vailton a disponibilizou e roda sem falhas no Windows 10 32 ou 64 bits.

    Jufer, disponibilizo o instalador da versão 0.70 para donwload
    http://maxxtech.com.br/forum/xDevStudio-0.70.exe

  2. 20 horas atrás, Ariston Santos disse:

    Já tentou assim?

    
                WITH OBJECT oBrw:aCols[1]
                   :bLClickHeader := {|r,c,f,oCol| NIL }
                END
    

     

    Olá Ariston.

    Já havia feito assim. Desta maneira somente deixa o click sem função, mas no visual ainda acontece o click.

     

    Obrigado

  3. Boa Noite
     

    ACTIVATE DIALOG oDlg CENTERED ON INIT ROUNDRECT(oDlg:hWnd,20)
    ***************************************************************************************************
    FUNCTION ROUNDRECT( hWnd, nROUND )
    ***************************************************************************************************
    
    	DEFAULT nROUND := 0
    
    RETURN SETWINDOWRGN(hWnd,CREATEROUNDRECTRGN(GETCLIENTRECT(hWnd),nROUND,nROUND))

    Acho que isso resolve...

    Abraços!!!

  4. Bom dia amigos.

    Como incluir registros na tabela ?

    Estou fazendo assim:

    
    

    BEGIN TRANSACTION

    FOR I := 1 TO LEN(aARRAY)

    SQLEXECUTE('INSERT INTO `_RESET` values (&aARRAY[i,1], &aARRAY[i,2], &aARRAY[i,3], &aARRAY[i,4], &aARRAY[i,5], &aARRAY[i,6], &aARRAY[i,7], &aARRAY[i,8], &aARRAY[i,9])')

    NEXT

    END TRANSACTION

    id=code>id=code>

    Mas não inclui nada...

    []'s

    logoforum.jpg

  5. Bom dia amigos.

    Como incluir registros na tabela ?

    Estou fazendo assim:

    
    

    BEGIN TRANSACTION

    FOR I := 1 TO LEN(aARRAY)

    SQLEXECUTE('INSERT INTO `_RESET` values (&aARRAY[i,1], &aARRAY[i,2], &aARRAY[i,3], &aARRAY[i,4], &aARRAY[i,5], &aARRAY[i,6], &aARRAY[i,7], &aARRAY[i,8], &aARRAY[i,9])')

    NEXT

    END TRANSACTION

    id=code>id=code>

    Mas não inclui nada...

    []'s

    logoforum.jpg

  6. Vamos lá

    
    

    SQL CONNECT ON "999.999.999.999" PORT 3306 USER "micro_reset" PASSWORD "*****" LIB "MySQL"

    IF SQL_ErrorNO() > 0

    MSGALERT( "Não foi possível conectar ao banco de dados !"+;

    "Informe esta mensagem ao suporte : "+;

    SQL_ErrorMsg() )

    QUIT

    ELSE

    MSGALERT('Conexão estabelecida com sucesso!')

    ENDIF

    IF !DATABASE('micro_reset')

    ? 'não'

    ELSE

    ? 'SIM'

    ENDIF

    SQLEXECUTE('USE "micro_reset"')

    cMsg:= SQLErrorMSG()

    IF !EMPTY(cMsg)

    ALERT('ERRO AO DAR "USE"')

    RETURN

    ENDIF

    id=code>id=code>

    O LOG equivalente é o que postei no meu post anterior

    []'s

    logoforum.jpg

  7. Obrigado pela resposta.

    Você conectou no banco?

    Resp.: Sim

    Criou uma base de dados?

    Resp.: Sim

    Deu um USE nela?

    Resp.: Não

    Fiz tudo como você passou, mas na hora do use da o seguinte erro:

    07/18/12 16:51:31 SQLLIB/1000: MySQL RDD: You have an error in your SQL syntax; check the manual that corresponds to your MySQL server version for the right syntax to use near '"micro_reset"' at line 1

    Versão do MySQL 5.1

    Não entendo...

    []'s

    logoforum.jpg

×
×
  • Create New...