VLNUNES

Valeu johnson, Mas "oPrinter:Copies := 1 " sempre sera um nº fixo de cópias, o que preciso é poder alterar este valor através de uma variável, usuário poder informar o nº de cópias que precisa ser impressa. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá amigos, Como passar o numero de copiasque deve ser impressa atraves de uma variavel ? Valeu Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá amigos, Como passar o numero de copiasque deve ser impressa atraves de uma variavel ? Valeu Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

O meu sistema de locadora tem um custo de 1.5 SM para a inplantação + 35% do SM mensal e não baixo o preço. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Matéria do site pctoledo O RDD DBFCDX Esse RDD permite a criação e manutenção de arquivos de dados e índices do FoxPro2. Principais características: Os índices .CDX do FoxPro são bem menores do que os .NTX criados pelo Clipper. Cria índices condicionais através das cláusulas FOR, WHILE, REST e NEXT. Cria arquivos de índices compostos que contém até 99 subíndices ou TAGS em um único arquivo reduzindo, assim, o número de arquivos abertos em nível do DOS. Como o Clipper permite apenas 15 arquivos associados e abertos com a área atual, o uso dos arquivos CDX permite a abertura de mais arquivos de índices sem sobrecarregar o número de arquivos que o DOS manipula. Para que o RDD DBFCDX funcione corretamente, devem ser seguidos os seguintes passos: 1 - Acrescente as linhas abaixo no início do seu programa principal: REQUEST DBFCDX RDDSETDEFAULT("DBFCDX") 2 - Para criar os arquivos de índices, você deve usar o seguinte comando: SELECT 1 USE CLIENTES INDEX ON codigo TAG indice1 TO cliente1 INDEX ON nome TAG indice2 TO cliente1 Observe que cada campo chave tem um TAG diferente (indice1 e indice2), mas todos estão sendo direcionados para um mesmo arquivo (cliente1), com isto será criado um arquivo de índice chamado CLIENTE1.CDX, com dois subíndices, um indexado pelo código do cliente e outro pelo nome do cliente. 3 - Para mudar a ordem em um arquivo de índice CDX, você deve proceder da seguinte forma: ORDSETFOCUS("INDICE2") Com este comando você vai selecionar o subíndice "INDICE2", que está indexado pelo campo nome do cliente. ORDSETFOCUS("INDICE1") Retorna ao subíndice principal, que está indexado pelo campo código do cliente. Se o comando ORDSETFOCUS( ) não for especificado, a ordem será sempre a do primeiro subíndice criado, neste caso será o indice1, pelo código. 4 - Para linkar um programa com o RDD DBFCDX, deve ser acrescentada a LIB DBFCDX durante o processo de linkagem: RTLINK FI teste LIB DBFCDX 5 - Os comandos abaixos continuam sendo usados da mesma forma: SET INDEX TO - Abre um arquivo de índice. CLOSE ALL - Fecha todos os arquivos de dados e índices associados. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Em dicas tem o UPX - VISUAL, que é muito fácil de se usar é baixar http://www.fivewin.com.br/exibedicas.asp?id=835 Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Valeu Luiz Fernando; Vou dar uma olhada. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá a todos ; Tenho de usar o mesmo dbf em 2 micros com 2 executáveis diferentes (um em xHb e o outro em clipper puro), estou abrindo o dbf com alias diferente e com os mesmos indices na mesma ordem, existe algun inconveniente como corrupição de dados ao realizar operações em ambus ?, e qual a melhor maneira de realizar esta tarefa ? Valeu; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá a todos ; Tenho de usar o mesmo dbf em 2 micros com 2 executáveis diferentes (um em xHb e o outro em clipper puro), estou abrindo o dbf com alias diferente e com os mesmos indices na mesma ordem, existe algun inconveniente como corrupição de dados ao realizar operações em ambus ?, e qual a melhor maneira de realizar esta tarefa ? Valeu; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Valeu Ico, Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Valeu kapiaba; Vou testar. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Com a dica do kapiaba Olá a todos É possivél ter telas sem a "moldura" as bordas e barra de título utilizando recursos, e se tem com ? Valeu Vander Editado por - vlnunes on 06/04/2008 12:56:38

Com a dica do kapiaba Olá a todos É possivél ter telas sem a "moldura" as bordas e barra de título utilizando recursos, e se tem com ? Valeu Vander Editado por - vlnunes on 06/04/2008 12:56:38

Em dicas tem UPX visual http://www.fivewin.com.br/exibedicas.asp?id=835 Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

jef2_tim; Tetou o WorkShop que vem com Delph 7 ou superior, o WS que eu estava usando, estava causando muitos erros, ai eu troquei pelo WS do Delph 7 e resouveu. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá kapiaba; Veja este link http://baixebr.org/?p=1868#more-1868 Quando vi não pude deixar de pensar no amigo Corinthiano. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá kapiaba; Veja este link http://baixebr.org/?p=1868#more-1868 Quando vi não pude deixar de pensar no amigo Corinthiano. Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Valeu amigos; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá amigos; 1 - Como definir o tamanho da página em Cm usando Win32Prn ? Com oPrinter:FormType := 9 é tamanho A4 mas e em Cm como seria ? 2 - Tem como evitar o eject no fim da impressão, pois tenho de usar "bobina" em LX-300 e impressora não fiscal. Valeu; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá amigos; 1 - Como definir o tamanho da página em Cm usando Win32Prn ? Com oPrinter:FormType := 9 é tamanho A4 mas e em Cm como seria ? 2 - Tem como evitar o eject no fim da impressão, pois tenho de usar "bobina" em LX-300 e impressora não fiscal. Valeu; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

RESOLVIDO. Valeu SHARK pela solução Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

SHARK, Valeu pela atenção Estou acionando este MENU com o botão direito e usando TWBrowse, como passar a posição atual do mouse ? Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Mais um vlnunes@click21.com.br Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex),

Olá amigos, Estou usando o código abaixo para exibir um menu POPUP, porém o menu sempre esta posicionado no topo da Lisbox. Tem como passar a linha onde o cursor esta e iniciar o menu nesta posição ? Static FUNCTION MenuBRIN(oBrw,qual) Local oMenu, aRect aRect:= GetClientRect(oBrw:hWnd) MENU oMenu POPUP SEPARATOR MENUITEM "&Marcar como brinde" ACTION MARBRIN() MENUITEM "&Desmarcar brinde" ACTION DESMARB() SEPARATOR ENDMENU ACTIVATE POPUP oMenu At aRect[2] + 1, aRect[3] Of oBrw Return Nil Valeu; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex), Editado por - VLNUNES on 03/01/2008 13:57:20

Olá amigos, Estou usando o código abaixo para exibir um menu POPUP, porém o menu sempre esta posicionado no topo da Lisbox. Tem como passar a linha onde o cursor esta e iniciar o menu nesta posição ? Static FUNCTION MenuBRIN(oBrw,qual) Local oMenu, aRect aRect:= GetClientRect(oBrw:hWnd) MENU oMenu POPUP SEPARATOR MENUITEM "&Marcar como brinde" ACTION MARBRIN() MENUITEM "&Desmarcar brinde" ACTION DESMARB() SEPARATOR ENDMENU ACTIVATE POPUP oMenu At aRect[2] + 1, aRect[3] Of oBrw Return Nil Valeu; Vander FW 2.6 / CLIPPER 5.3 / BLINKER 5 / WS 4.5 / xharbour 0.99.50 (simplex), Editado por - VLNUNES on 03/01/2008 13:57:20