Guest n/a Posted October 25, 2008 Report Share Posted October 25, 2008 Ainda existe isso ??????? o tal usado @ x,y to xx,yy ???????? vlw MSN --[ lailton.webmaster@hotmail.com ]-- FiveWin 8.5 | Xharbour 1.1.0 | BCC55 | C Pelles | Designer.LIB Quote Link to comment Share on other sites More sharing options...
Guest n/a Posted October 25, 2008 Report Share Posted October 25, 2008 Ainda existe isso ??????? o tal usado @ x,y to xx,yy ???????? vlw MSN --[ lailton.webmaster@hotmail.com ]-- FiveWin 8.5 | Xharbour 1.1.0 | BCC55 | C Pelles | Designer.LIB Quote Link to comment Share on other sites More sharing options...
Guest n/a Posted October 26, 2008 Report Share Posted October 26, 2008 TEstei aqui e funcionou ^^ mais nao entendi mto por exemplo se eu qise-se fazer uma linha reta ________________________________________________ uma baixo da outra sem ter espado em branco @1.0, 10 to 1.0, 100 @1.1, 10 to 1.1, 100 @1.2, 10 to 1.2, 100 @1.3, 10 to 1.3, 100 @1.4, 10 to 1.4, 100 @1.5, 10 to 1.5, 100 @1.6, 10 to 1.6, 100 @1.7, 10 to 1.7, 100 @1.8, 10 to 1.8, 100 nao fica alguem sabe dizer pq e como fazer para fazer linhas retas sem espaco entre elas umas 10 uma abaixo da outra coladinha ^^ MSN --[ lailton.webmaster@hotmail.com ]-- FiveWin 8.5 | Xharbour 1.1.0 | BCC55 | C Pelles | Designer.LIB Quote Link to comment Share on other sites More sharing options...
atnsoft Posted October 26, 2008 Report Share Posted October 26, 2008 Já tentou com Size ? @1.0, 10 to 1.0, 100 size 12,30 AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce Quote Link to comment Share on other sites More sharing options...
Guest n/a Posted October 26, 2008 Report Share Posted October 26, 2008 tentei agora porem da erro nesta linha se eu por size... num teria nenhuma class que insira uma linha na horizontal ?? thanks MSN --[ lailton.webmaster@hotmail.com ]-- FiveWin 8.5 | Xharbour 1.1.0 | BCC55 | C Pelles | Designer.LIB Quote Link to comment Share on other sites More sharing options...
Guest johnson Posted October 26, 2008 Report Share Posted October 26, 2008 DEFINE PEN oPen WIDTH 5 Linha(2, 5, 2, 20, oPrn, oPen) // desenha linha *----------------------------------------------------------------------- // nUp,nLeft,nDown,nRight := Coordenadas em Centimetros // oPrn := Objeto Printer // oPen := Objeto oPen para Linha *----------------------------------------------------------------------- Function Linha(nUp,nLeft,nDown,nRight,oPrn,oPen) Local xCor:={} , yCor:={} xCor := oPrn:Cmtr2Pix(nUp,nLeft) yCor := oPrn:Cmtr2Pix(nDown,nRight) oPrn:Line(xCor[1],xCor[2],yCor[1],yCor[2],oPen) Return NIL id=code>id=code>espero q ajude Quote Link to comment Share on other sites More sharing options...
Guest johnson Posted October 26, 2008 Report Share Posted October 26, 2008 linha em dialog? label quebra o galho nao? @ 005, 006 TO 005, 150 LABEL "" PIXEL OF oDlg Quote Link to comment Share on other sites More sharing options...
Guest n/a Posted October 26, 2008 Report Share Posted October 26, 2008 Error Cmtr2Pix() y com o label fica como se fose quadrado o que ue quero é fazer uma linha reta na horizontal apos isso inserir outras linhas iguais porem abaix dela juntinhas ------------------------------------------------- ------------------------------------------------ colado na de cima como se fose 1 so MSN --[ lailton.webmaster@hotmail.com ]-- FiveWin 8.5 | Xharbour 1.1.0 | BCC55 | C Pelles | Designer.LIB Quote Link to comment Share on other sites More sharing options...
personal Posted October 27, 2008 Report Share Posted October 27, 2008 @ l,c Say "" OF oDlg Pixel Size 100,2 COLOR Cor1,Cor2 Oliveira, Sérgio A. PERSONAL Comp. e Sitemas.id=green> Quote Link to comment Share on other sites More sharing options...
atnsoft Posted October 27, 2008 Report Share Posted October 27, 2008 Tentou com Replicate: @ 01,01 say Replicate("_", 100) Size 2,100 id=code>id=code>AtnSoft(Antenor Rabello) - xHarbour 0.99.71 / FwH 7.05 / Verce Quote Link to comment Share on other sites More sharing options...
sambomb Posted October 27, 2008 Report Share Posted October 27, 2008 Se for estático não serviria no Pelles? Insira um bitmap e altere o style dele, da para fazer molduras, linhas horizontais e linhas verticais.... e via programação pode aumentar o bitmap para fazer ele se tornar dinâmico... podendo se ajustar, mas acho que o calculo vai ser chato uma vez que a medida do pelles é um enigma pra mim MSN: samirabreu@hotmail.com Skype: SamirAbreu xHarbour 1.1.0 + FwXh 8.02 Quote Link to comment Share on other sites More sharing options...
sambomb Posted October 27, 2008 Report Share Posted October 27, 2008 citação:Error Cmtr2Pix() y com o label fica como se fose quadrado o que ue quero é fazer uma linha reta na horizontal apos isso inserir outras linhas iguais porem abaix dela juntinhas ------------------------------------------------- ------------------------------------------------ colado na de cima como se fose 1 so MSN --[ lailton.webmaster@hotmail.com ]-- FiveWin 8.5 | Xharbour 1.1.0 | BCC55 | C Pelles | Designer.LIB id=quote>id=quote>Ahh.... agora que eu entedi o que vc quer fazer..... Mas também da pra fazer pelo Pelles.... Adicione as linhas, no "on init" da dialog coloque "visible" dos bitmaps como false, e coloque "visible" true conforme achar necessário Acho que isso resolve seu problema né.... fica até mais fácil de controlar e programar usando um array de objetos: citação:local / private / public oLinha := Array(numero de linhas) para declarar você pode usar um for: For i := 1 to Len(oLinha) ReDefine Bitmap oLinha; ID i;// considerando o ID 1,2,3 etc.... ou faz uma soma com o i of oDlg end id=quote>id=quote>MSN: samirabreu@hotmail.com Skype: SamirAbreu xHarbour 1.1.0 + FwXh 8.02 Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.