Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________
Prueba renombrando su extensión por MSK
Ej.
Imagen.bmp por Imagen.msk
Supongamos que tengo un "bmp", por ejemplo "cerrar.bmp"
Con un programa de dibujo, como el "Paint", lo grabo con otro nombre
por ejemplo "cerrar2.bmp".
Este segundo, le cambio los atributos a "Blanco y negro"
Para asegurarme, las zonas que hayan quedado en blanco, las vuelvo a
rellenar con blanco, y grabo el archivo (cerrar2.bmp)
Cierro el "Paint", y renombro el archivo "cerrar2.bmp" como "cerrar.msk"
Y nada más.
Un saludo.
El día 10 de marzo de 2011 06:54, Jhonny Zambrana
<jhonny....@gmail.com> escribió:
--
Jose A. Blasco
Zaragoza - España
Yo los creo mejor como PNG así si funciona bien la trasparencia
______________________________________
Desarrollos de software
Cel: (502) 55274094
E-mail: in...@magicsoft.com.gt
Aletrnativo: tayi...@gmail.com
Web: www.magicsoft.com.gt


De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Miguel Antúnez
Enviado el: jueves, 10 de marzo de 2011 10:13 a.m.
Para: publice...@googlegroups.com
Alguien tiene una rutina para buscar un texto en un campo memo .
Atte
Jairo
Funciona, encuentra la cadena, la idea ahora es que el cursor se posicione en la palabra encontrada,
Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________
Muy bueno .. ya lo probe y funciona de maravilla , hice algunos arreglos
Por ejemplo
oRep15 =Createobject("Form")
With oRep15
.Caption= "Ventana de Informes"
.top = 15
.left = 329
.height = 700
.Width = 800
.WindowState= 0
.Show()
ENDWITH
SET TALK OFF
msrchstr=ALLTRIM(Thisform.txtMsgID.Value)
m.occurrence=1
DO WHILE .t.
mfound=AT(msrchstr,Tema,m.occurrence)
IF mfound > 0
m.occurrence=m.occurrence+1
MODI MEMO Tema NOWAIT NOEDIT RANGE mfound,mfound+LEN(msrchstr) Window (oRep15.Name)
WAIT WINDOW 'Presione enter o un click para continuar'
ELSE
EXIT
ENDIF
ENDDO
SET TALK ON
Aquí funciona en un form que creo y muestro el campo memo en ese form,
La idea seria ..=?como desplegarlo en un editbox???
Jairo
De: publice...@googlegroups.com [mailto:publice...@googlegroups.com] En nombre de Luis Maria Guayan
Enviado el: Viernes, 11 de Marzo de 2011 09:29
Para: publice...@googlegroups.com
Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________
Perfecto… que bien , muchas gracias comunidad , espero que no tiemble mas….
El único problema es que solo funciona en una sola ocurrencia.. , si existe en otras partes del texto no continua.
Luis María Guayán
Tucumán, Argentina
_________________________
http://www.PortalFox.com
Nada corre como un zorro
_________________________