Página 1 de 1

Problema imagnes otoolbat

Publicado: Lun Nov 20, 2006 12:15 pm
por PILO
Cuando intento añadir alguna imagen mas en la opcion de
oimangenlist de la ttoolbar
solo me permite la primera con en la imagen adjunta
no me permite ninguna mas.
Algunas veces si me permite poner alguna pero cuando lo
vuelvo a arrancar ya solo una


Attached files

Problema imagnes otoolbat

Publicado: Lun Nov 20, 2006 12:35 pm
por ignacio
Pilo,
Las siguientes han der ser DE IDÉNTICO TAMAÑO. Quizás ese sea el problema.
Un saludo
--
Ignacio Ortiz de Zúñiga
http://www.xailer.com
"PILO" <srmpilo@hotmail.com> escribió en el mensaje
news:[email=45618e30@news.xailer.com...]45618e30@news.xailer.com...[/email]
> Cuando intento añadir alguna imagen mas en la opcion de
> oimangenlist de la ttoolbar
> solo me permite la primera con en la imagen adjunta
> no me permite ninguna mas.
> Algunas veces si me permite poner alguna pero cuando lo
> vuelvo a arrancar ya solo una
>
>

Problema imagnes otoolbat

Publicado: Lun Nov 20, 2006 12:49 pm
por PILO
Gracias, tenia que elegir un tamaño fijo de icon, sino no salia ya que son
de diferentes
tamaños
"Ignacio Ortiz de Zúñiga" <NoName@xailer.com> escribió en el mensaje
news:[email=456192fc@news.xailer.com...]456192fc@news.xailer.com...[/email]
> Pilo,
>
> Las siguientes han der ser DE IDÉNTICO TAMAÑO. Quizás ese sea el problema.
>
> Un saludo
>
> --
> Ignacio Ortiz de Zúñiga
> http://www.xailer.com
> "PILO" <srmpilo@hotmail.com> escribió en el mensaje
> news:[email=45618e30@news.xailer.com...]45618e30@news.xailer.com...[/email]
>> Cuando intento añadir alguna imagen mas en la opcion de
>> oimangenlist de la ttoolbar
>> solo me permite la primera con en la imagen adjunta
>> no me permite ninguna mas.
>> Algunas veces si me permite poner alguna pero cuando lo
>> vuelvo a arrancar ya solo una
>>
>>
>
>

Problema imagnes otoolbat

Publicado: Lun Nov 20, 2006 12:56 pm
por PILO
En este metodo:
METHOD AddNew() CLASS Tclientes
LOCAL oFrm
local codigo1 := space(15)
WITH OBJECT oFrm := TENVIOS():createform( Self )
:cText := "CREA NUEVO CLIENTE"
WITH OBJECT ::oDataSet
Aqui creo el formulario nuevo en
tengo que buscar en el odataset, el ultimo registro ordenador por codigo
Goto Bottom // BUSCO EL ULTIMO CODIGO
codigo1 := ltrim(STR((VAL(::oDataSet:CODIGO) + 1),15,0))
GOTO TOP
coger el ultimo registro de odataset y sumarle 1, despues
comprobar si hay algun registro igual, si lo hay seguir sumando hasta que encuentre
uno que no lo tenga
locate FOR :CODIGO = CODIGO1 // BUSCO CODIGO DUPLICADOS
WHILE FOUND()
codigo1 := ltrim(STR((VAL(CODIGO1) + 1),15,0))
GOTO TOP
locate FOR :CODIGO = CODIGO1
END WHILE
end with
::oDataSet:AddNew()
::oDataSet:CODIGO := codigo1 // tAqui añado el nuevo codigo a registro nuevo
:ShowModal()
if :nModalResult == mrOK
::oDataSet:Update()
::oDBBrowse1:Refresh()
else
::oDataSet:Cancel()
endif
END WITH
RETURN NIL
Lo estoy haciendo mal ya que no me hace lo de buscar el ultimo registro, y poner en el
nuevo creado, Me puedes ayudar un poco, Gracias de antemano
--