Search found 82 matches

by ICO
Fri May 27, 2011 6:13 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TwBrowse X Font
Replies: 8
Views: 3244

Re: TwBrowse X Font

Pessoal.. consegui resolver trocando o controle do PellesC de ListBox para CUSTOM CONTROL
Mesmo assim não fica legal porque não tem as opções de border e Horz/Vert-Scrollbar
by ICO
Fri May 27, 2011 5:50 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TwBrowse X Font
Replies: 8
Views: 3244

Re: TwBrowse X Font

Boa Tarde..

Pessoal, não deu certo..

tentei com a dica do Willi e mesmo assim não deu certo

Vejam como está o código.

DEFINE FONT oFont3 NAME "Arial" BOLD SIZE 7,-13Define Dialog oDlg Resource "#1001"  Title "..::SEM SetFont"   Redefine ListBox olbx Fields Nomes->Nome,Nomes ...
by ICO
Thu May 26, 2011 7:55 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TwBrowse X Font
Replies: 8
Views: 3244

Re: TwBrowse X Font

Ola Armando..
Tentei com "ARIAL" SIZE 10,10 edeu certo, porém se eu mudar para SIZE 12,10, 12,12 ou qualquer uma que não seja 10,10 me retorna o erro;
Error description: Error BASE/1004 Class: 'NIL' has no exported method: EVAL Args: [ 1] = U [ 2] = O TWBROWSE

Creio que deve ter ...
by ICO
Tue May 24, 2011 5:42 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TwBrowse X Font
Replies: 8
Views: 3244

Re: TwBrowse X Font

Ola Armando, Obrigado por responder

Não funcionou.. o curioso é que só aceita 0,-9 até 0,-12... se tentar acima de 12 dá o mesmo erro

Mesmo Se ficar entre 0,-1 até 0,-12 não dá o erro mais não muda a fonte no Browse.. Veja o código

DEFINE BRUSH oBrush1 FILE "..\bitmaps\backgrnd\paper.bmp"oFont3 ...
by ICO
Tue May 24, 2011 2:29 pm
Forum: FiveWin para Harbour/xHarbour
Topic: TwBrowse X Font
Replies: 8
Views: 3244

TwBrowse X Font

Bom dia a Todos..
Estou tentando alterar o font na TwBrowse e está retornando este erro

Error description: Error BASE/1004 Class: 'NIL' has no exported method: EVAL
Args:
[ 1] = U
[ 2] = O TWBROWSE

O que poderia ser ?

Já tentei fazer Assim;

Define Font oFont3 name "MS SANS SERIF" SIZE 9,15 ...
by ICO
Thu Nov 04, 2010 6:55 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Visual Union for Fivewin
Replies: 5
Views: 1306

Re: Visual Union for Fivewin

Boa Tarde..
A pagina do CentralXbase saiu do ar. tente falar com o Ricardo M Marques. ele é o criador do Visual Union, talvez ele possa te ajudar no que vc. precisa..

ricardomouramarques@hotmail.com

Abraços..
by ICO
Wed Sep 22, 2010 7:03 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Como hago un get se vea WHEN .F.
Replies: 8
Views: 1169

Re: Como hago un get se vea WHEN .F.

Altere la propriedade do get em PellesC

Code: Select all | Expand


Client edge = yes
static edge = yes
 


Veja se é isto que você quer..

Abraços..
by ICO
Wed Sep 15, 2010 7:23 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Arquivo.PNG
Replies: 5
Views: 977

Re: Arquivo.PNG

Obrigado Patricio.. Vou verificar sua dica..
by ICO
Tue Sep 14, 2010 10:34 pm
Forum: FiveWin para Harbour/xHarbour
Topic: Arquivo.PNG
Replies: 5
Views: 977

Arquivo.PNG

Como faço para usar bitmap no formato PNG ??

Assin não tá funcionando.

Code: Select all | Expand


Define Button obtn Prompt "Papel"         ;
       File".\imagens\icones\Sair.PNG"    ;
       Of oBar Action oWnd:End()



Obrigado.
by ICO
Fri Sep 10, 2010 12:52 pm
Forum: FiveWin para Harbour/xHarbour
Topic: ToutLook2003
Replies: 0
Views: 353

ToutLook2003

Bom Dia
Como faço para inserir uma imagen de fundo na Toutlook2003 ??

Image

Dela ser MDI tem algo diferente ??

Obrigado...
by ICO
Mon Jul 26, 2010 1:35 pm
Forum: FiveWin para Harbour/xHarbour
Topic: editar en xbrowse
Replies: 1
Views: 618

Re: editar en xbrowse

Ola .. Tente assim;

oCol:= oLbx:AddCol()
oCol:bStrData := { || Arq->NOme }
oCol:cHeader := "Nome"
oCol:nWidth := 200
//--Editar Coluna
oCol:bEditvalue := { || ARQ->NOME }
oCol:nEditType := EDIT_GET
oCol:cEditPicture := "@!"
oCol:bonPostEdit := { | oCol, uValue, nLastKey | If( nLastKey ...
by ICO
Thu Jul 08, 2010 1:40 pm
Forum: FiveWin para Harbour/xHarbour
Topic: BTNBMP
Replies: 5
Views: 981

Re: BTNBMP

Resolvido desta forma ;

Code: Select all | Expand

Redefine BTNBMP obtn[2]             ;
         Prompt Space(10)+"&Fechar" ;
         Resource....


Obrigado..
by ICO
Thu Jul 08, 2010 11:48 am
Forum: FiveWin para Harbour/xHarbour
Topic: BTNBMP
Replies: 5
Views: 981

Re: BTNBMP

Bom Dia Ojeda..
Não Resolveu..

Tenho 3 imagens no button porque ao pressionar o button a imagem troca, e quando ela está disable tb. mostra outra imagem..


Abraços..
by ICO
Wed Jul 07, 2010 5:25 pm
Forum: FiveWin para Harbour/xHarbour
Topic: BTNBMP
Replies: 5
Views: 981

Re: BTNBMP

Ola Ojeda.. Obrigado por responder

Veja bem, Eu já estou usando BOTTOM, e mesmo usando o TOP o espaço entre a imagem e o texto são muitos próximos como mostra na 1ª imagem. e não quero usar LEFT nem RIGHT

Estou Fazendo assim;
Redefine BTNBMP obtn[1] Prompt "&Sair" ; RESOURCE "#8005 ...
by ICO
Wed Jul 07, 2010 2:55 pm
Forum: FiveWin para Harbour/xHarbour
Topic: BTNBMP
Replies: 5
Views: 981

BTNBMP

Bom Dia a todos..

Como faço para aumentar a distancia entre a imagem e o texto da BtnBmp ??

http://img809.imageshack.us/img809/8131/btnbmp.png

A imagem está muito junto com o texto...

Eu gostaria que ficasse com os espaços igual aos buttons da ButtonBar
http://img441&#46 ...