Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Mi prograsma no funciona en otras maquinas (https://www.clubdelphi.com/foros/showthread.php?t=53679)

eduarcol 27-02-2008 17:14:10

Abre el que dice project1, y copianos el codigo, igual que el codigo de las dos funciones de llenar, por ahi deben venir los tiros

gulder 27-02-2008 17:32:49

eduarcol aqui esta el del projec me imagino que esto lo que me pides

Código Delphi [-]
program Project1;

uses
  Forms,
  Unit1 in 'Unit1.pas' {Form1},
  Unit2 in 'Unit2.pas' {Form2},
  Unit3 in 'Unit3.pas' {Form3};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.CreateForm(TForm2, Form2);
  Application.CreateForm(TForm3, Form3);
  Application.Run;
end.


bueno y en cuanto a las dos funciones de llenas ya estaban pero aqui ban otravez

Código Delphi [-]

procedure TForm2.llenar_informacion(T_letra: string;color1,color2:string);
begin
    form1.Label1.Font.Name:=T_letra;
    form1.Label1.Font.Color:=StringToColor(color1);
    form1.Label2.Font.Name:=T_letra;
    form1.Label2.Font.Color:=StringToColor(color1);
    form1.Label3.Font.Name:=T_letra;
    form1.Label3.Font.Color:=StringToColor(color1);
    form1.Label4.Font.Name:=T_letra;
    form1.Label4.Font.Color:=StringToColor(color1);
    form1.Label5.Font.Name:=T_letra;
    form1.Label5.Font.Color:=StringToColor(color1);
    form1.Label6.Font.Name:=T_letra;
    form1.Label6.Font.Color:=StringToColor(color1);
    form1.Label7.Font.Name:=T_letra;
    form1.Label7.Font.Color:=StringToColor(color1);
    form1.Label8.Font.Name:=T_letra;
    form1.Label8.Font.Color:=StringToColor(color1);
    form1.Label9.Font.Name:=T_letra;
    form1.Label9.Font.Color:=StringToColor(color1);
    form1.Label10.Font.Name:=T_letra;
    form1.Label10.Font.Color:=StringToColor(color1);

    form1.Panel1.Color:=StringToColor(color2);
    form1.Color:=StringToColor(color2);

end;



procedure TForm2.llenar_informacion2(T_letra: string;color1,color2:string);
begin
    form1.JvPlaylist1.Font.Name:=T_letra;
    form1.JvPlaylist1.Font.Color:=StringToColor(color1);
    form1.JvPlaylist1.Color:=StringToColor(color2);
    form1.panel3.Color:=StringToColor(color2);
end;


bueno aqui esta lo que me pides saludos

eduarcol 27-02-2008 18:18:42

pues despues de haber revisado todo lo que tienes, me atrevo a decir que el problema puede estar que ExtractFilePath devuelve la ruta con un '\' al final, y tu lo sumas a la busqueda de nuevo, prueba con ExtractFileDir y asegurate que todas las busquedas tengan el '\' antes del nombre del archivo

gulder 27-02-2008 20:27:06

bueno hasta que por fin di con el bendito error
 
Bueno foro ya encontre el error que me habia mortificado toda la mañana, resulta que entre los componenetes que yo utilice y mas especificamente el JvID3v21 cuando empece a realizar el programa le cargue un archivo en la propiedad filename eso es tiempo de diseño, y se me habia olvidado quitarcela, entonces como en mi pc estaba el archivo que le habia mandado en la propiedad filename no me arrojaba el error se lo quite le mande el programa a un amigo y listerine funciono a la perfeccion jejej gracias dios, bueno haora me toca agradecer a todos aquellos foristas que pasaro ayudandome como lo son:

ixMike
Neftali
eduarcol
Ferrari
Lepe


hombre gracias por todo ha y si quieren descargar el instalador aqui esta:

Descarga rapidshare
http://rapidshare.com/files/95415956...0____setup.exe

Descarga megaupload
http://www.megaupload.com/?d=A2CU7HJA

salu2 gulder

MARLON1 28-03-2008 17:15:32

hola
 
Cita:

Empezado por eduarcol (Mensaje 268967)
seguro estas cargando un archivo desde una unidad de disco que no existe, si puedes coloca el codigo que se ejecuta al abrir el sistema para ver que hace

hola, he estado buscando temas acerca de como hacer un instalador de mi programa pero hasta ahora solo eh encontrado este, espero que me puedas hechar una mano porfa, ya que por suerte estas conectado.gracias:D

eduarcol 28-03-2008 17:29:04

Cita:

Empezado por MARLON1 (Mensaje 276003)
hola, he estado buscando temas acerca de como hacer un instalador de mi programa pero hasta ahora solo eh encontrado este, espero que me puedas hechar una mano porfa, ya que por suerte estas conectado.gracias:D

Esto no tiene que ver nada con instalar, para poder ayudarte danos mas datos sobre tu programa, que hace, con que lo hace y que necesita...

MARLON1 28-03-2008 17:35:02

Hola
 
Cita:

Empezado por eduarcol (Mensaje 276007)
Esto no tiene que ver nada con instalar, para poder ayudarte danos mas datos sobre tu programa, que hace, con que lo hace y que necesita...

BUENO ESTOY TRABAJNDO EN DELPHI 5 Y UTILIZO MYSQL SERVER 5.0, EL PROGRAMA ES MUY PEQUEÑO SOLO ALMACENA DATOS DE MAQUINARIA Y CLIENTES QUE LAS RENTAN, ALGUNAS COSAS OTRAS COSAS MAS RELACIONADO CON LO ANTERIOR, LO QUE REALMENTE QUIERO ES SABER COOMO HACER UN CD DE INSTALACION DE ESTO, ESPERO QUE PUEDAS AYUDARME.

eduarcol 28-03-2008 19:40:03

Delphi5 trae una excelente herramienta que es el InstallShield, el cual puede generar lo que deseas, ahora con respecto al mySql creo que tendras un problema de licencia si lo distribuyes con tu aplicación.


La franja horaria es GMT +2. Ahora son las 11:39:35.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi