Componente TLabel

[[eduarcol]]

Acabo de probar el codigo de seoane completo y no me ha dado problemas, lo instale y modifique el texto en ejecucion funciona muy bien
lo qu eno entiendo es apara que le quitas parte del codigo, por ejemplo si no se ejecuta el create no va a ejecutarse el movimiento que se le asigna en ese evento

[[Caral]]

Hola
Que estoy haciendo mal.
Creo un unit nuevo, lo guardo con el nombre Blinklbl
Voy a Component, instal component
me da el error que mencione, algo de class
Que puede ser, que estoy haciendo mal.
Tambien lo hice como me mencionaste sin cambiar el nombre el unit, no me funciona.
Saludos

[[Delphius]]

listo, hice la prueba... era un error conceptual mio y de apurado quise meter código y metí mal el dedo

Lo que estaría interesante, si es que le sirve a Caral, es contar con la posibilidad de deshabilitar/habilitar los efectos. E inclusive, porque no... adaptarlo para varios tipos de efectos:

1. Desplazamiento a la izquierda
2. Desplazamiento a la derecha
3. Cierre: que el texto vaya desplazandose desde los extremos al medio.
4. Apertura: que el texto vaya desplazandose desde el centro hacia afuera.
5. Aleatorio.

No creo que sea tan complicado generarlos... Se que lo más posible es que hay componentes ya hechos que realizan estas cosas... pero como práctica no está demás.

Saludos,

[[eduarcol]]

Pues en el error que mencionastes no dice nada de class sino clause.

Intenta esto, cierra delphi por completo, abrelo y selecciona Close All, luego File --> New --> Unit

borra todo excepto la primera linea, unit

copia el codigo, excepto la primera linea, dale guardar y asignale un nombre

Cierra todo de nuevo y abre instalar componentes, busca la unidad que acabas de guardar y le das ok, eso deberia instalarla

que delphi utilizas????

[[eduarcol]]

Si te fijas en el primer codigo estan los puntos que tu contemplas en el 1 y 2

[[Caral]]

Hola
Paso a paso y lo mismo.
Pienso que tiene que ver con esto.

procedure Register;
begin
RegisterComponents('Curso', [TBlinkLabel]);
RegisterComponents('Curso', [TMarqueeLabel]);
end;

Vosotros estais cambiando algo? o solo lo copias y lo pegas?.
Me sigue dando el mismo error.
Uso delphi 6.
Saludos

[[Delphius]]

Si te fijas en el primer codigo estan los puntos que tu contemplas en el 1 y 2

Cierto! para ello está invertir!
Olvida los puntos 1 y 2.

Con respecto al error que le da a Caral... a mi no me arroja nada, todo bien. Tengo Delphi 6, que es la versión que emplea Caral (tengo entendido).
Nunca vi ese error... ¿Caral... sobre que línea te arroja el "DICHOSO" error?

Saludos,

[[eduarcol]]

Bueno ahora es que le hace falta a esta foro una herramienta: Acceso Remoto, seguro que seoane debe tener alguna porq por lo que dices no se me ocurre nada que echarle mano al codigo a ver

[[Caral]]

Hola
Simplemente me manda ese mensaje no dice en donde.
Ya no se que hacer, primera vez que me pasa algo asi, nunca he tenido problemas al instalar un componente.
Que sera?.
Alguien trajo la bola de cristal?
Saludos

[[Caral]]

Hola
Estaba tratando de abrir un paquete:
dclusr
Se supune que es donde se instala el componente (Delphi package source (*.dpk).
Al tratar de abrirlo me manda exactamente ese error.
Pregunto sera que meti las patas en algun lado y no puedo instalar componentes?
Tengo que instalarlo en otro lado?, se puede?
Saludos

[[Delphius]]

Pues caral yo también estoy intrigado, yo me hecho componentes y a pesar de que al comienzo tuve inconvenientes para instalarlos... nunca vi ese error.

Espero que mis pasos te sean de ayuda:

1. Abro un nuevo proyecto. Abrí un unit nuevo, borre TODO y copié exactamente el código de seoane. Ni más ni menos.
2. anadí al dpr dicha unidad. Guardo el proyecto entero e indicando con el nombre Blinklbl, y no con Uxxxx (Puede que alli esté el problema?). De modo que en el dpr queda esto:

program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Blinklbl in 'Blinklbl.pas';

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.

3. Hago run, y listo... funciona. No marca error.
4. Voy a Component -> Install Component.
5. En el cuadro de Unit File Name busco el Blinklbl.pas y lo selecciono. Doy OK.
6. Me aparece un mensaje: "Package dclusr.bpl will be rebuilt. ¿Continue?" Le digo YES.
7. Me aparece un cuadro chico... con los componentes añadidos al paquete, le doy a Compile. Presiono en la X para cerrat y le indico que NO guarde los cambios. Y listo, el componente queda instalado...

A decir verdad, no se a que otra cosa puede deberse. Si tu dices que nunca antes tuviste problemas para instalar... a lo mejor tienes algún conflicto con algún componente que instalaste anteriormente.

Saludos,

[[eduarcol]]

Se me acaba de ocurrir algo:

Cierra todo lo que tengas abierto File --> New --> Other

seleciona Package y agrega la unit que grabastes compile y install

[[Caral]]

Hola
Efectivamente funciono, ahora me puedes decir que hice?.
Que se rompio de camino?
Por que no me lo garbaba en el otro sitio?
Saludos

[[eduarcol]]

y como funciono?? si es como te lo dije el problema es que el dclusr esta creado con otros componentes y el error de contains es que las uses necesarias no se estaban creando correctamente

[[seoane]]

Hola Caral, parece que el error puede ser debido que package que estas utilizando hace referencia a una unit que no existe. Abre el archivo con la extensión .dpk, busca la sección "Contains" y comprueba que todas las unidades que allí aparecen son correctas.

PD: Imagínate la que tengo que montar yo para instalar los componentes en Turbo Delphi Explorer

[[Caral]]

Hola
Intente abrir el archivo dclusr y me da ese error, no se como abrirlo?.
Saludos

[[Delphius]]

¿Y como te funcionó?
Haciendo un nuevo paquete e instalandolo?

Si es con un nuevo paquete... abría que ver porqué no te dejaba instalarlo en el otro... algún error debe haber en dicho paquete...

Cuenta los pasos... porque me he quedado en b.... por saber a que %"!%" se debía el error. Porque si por las moscas algún dia me pase (ojalá que nunca) sepa como resolverlo... Digo... si no es molestia.

Saludos,

[[seoane]]

Abrelo con el bloc de notas, no es mas que un archivo de texto.

[[eduarcol]]

Empezado por seoane

PD: Imagínate la que tengo que montar yo para instalar los componentes en Turbo Delphi Explorer

Estoy intrigado, ¿¿no se vale dar pistas??

Caral por lo menos ya sabemos qe lograstes corromper el dclusr ahora explicanos como jejje

[[Caral]]

Hola
Me sale esto:

package dclusr;

{$R *.res}
{$R 'USAPPBAR.dcr'}
{$R 'TrayIcon.dcr'}
{$R 'ATEXTO.dcr'}
{$R 'ALed.dcr'}
{$ALIGN 8}
{ ASSERTIONS ON}
{$BOOLEVAL OFF}
{ DEBUGINFO OFF}
{$EXTENDEDSYNTAX ON}
{$IMPORTEDDATA ON}
{$IOCHECKS ON}
{ LOCALSYMBOLS OFF}
{$LONGSTRINGS ON}
{$OPENSTRINGS ON}
{$OPTIMIZATION ON}
{$OVERFLOWCHECKS OFF}
{$RANGECHECKS OFF}
{$REFERENCEINFO OFF}
{$SAFEDIVIDE OFF}
{ STACKFRAMES OFF}
{$TYPEDADDRESS OFF}
{$VARSTRINGCHECKS ON}
{$WRITEABLECONST ON}
{$MINENUMSIZE 1}
{$IMAGEBASE $51000000}
{$DESCRIPTION 'Borland User Components'}
{$LIBSUFFIX '60'}
{$DESIGNONLY}
{$IMPLICITBUILD ON}

requires
rtl,
vcl,
designide;

contains
NumEdit in 'NumEdit.pas',
USAppBar in 'USAPPBAR.PAS',
TrayIcon in 'TrayIcon.pas',
ATexto in 'ATEXTO.PAS',
ALed in 'ALed.pas',
Blinklbl in 'Blinklbl.pas',

end.

Que significa?
Saludos