jjnouiphp
Messages postés33Date d'inscriptionlundi 19 avril 2004StatutMembreDernière intervention21 janvier 20201 3 nov. 2010 à 17:18
L'idée est excellente, même pour ceux qui ne prennent pas le bus.
Je pense à ceux qui doivent fumer une cigarette à heure fixe (pour rencontrer une collègue d'un autre service, ou pour éviter le boss).
Je suis sûr qu'on pourrait ouvrir une boîte à idées, non ?
Bacterius
Messages postés3792Date d'inscriptionsamedi 22 décembre 2007StatutMembreDernière intervention 3 juin 201610 18 août 2010 à 15:40
Ca ressemble à une traduction automatique ...
Mowglinaute
Messages postés41Date d'inscriptiondimanche 4 mars 2007StatutMembreDernière intervention27 février 2013 18 août 2010 à 15:22
Bonjour, Je prend jamais le bus, trop d'agressions sont fréquentes, je préfère me déplacer avec ma voiture sans me soucier de l'heure de son départ et voyager sur les routes non encombrées par les fous du volant aiment la vitesse pour aller vite dans leur fin de vie.
Créer un logiciel pour voir le départ d'un bus est à mon sens tout à fait inutile. Je vais créer un logiciel pour savoir si il n'y a pas un fou qui va emboutir ma voiture serais plus utile à l'heure actuel.
Bien à vous ...
Dr. J.LOMBET
cs_yanb
Messages postés271Date d'inscriptionlundi 27 octobre 2003StatutMembreDernière intervention 7 juillet 202214 23 juil. 2010 à 10:30
Salut pseudomino,
Pour tester sous delphi rien de bien compliqué mais un peu de gymnastique
Extraire dans un répertoire les fichiers
Unit1.pas et Unit1.lfm
Unit2.pas et Unit2.lfm
Project1.lpr
autobus.png et icone.png
Rennomer les fichiers .lfm par .dfm
Rennomer le fichier .lpr par .dpr
Ensuite dans un editeur de texte comme NotePad++
Dans project1.dpr :
Supprimer : {$mode objfpc}{$H+}
Modifier le uses complet par :
uses
Forms,
Unit1 in 'Unit1.pas',
Unit2 in 'Unit2.pas';
{$R *.res}
Supprimer la ligne : {$I project1.lrs}
Dans Unit1.pas :
Supprimer : {$mode objfpc}{$H+}
Supprimer dans le uses : FileUtil, LResources, EditBtn, RTTICtrls
Ajouter sous implementation : {$R *.dfm}
Modifier dans la procedure TForm1.TimerSurveillanceTimer(Sender: TObject);
Q : Float; par Q : Extended;
Et supprimer à la fin du fichier : initialization {$I unit1.lrs}
Dans Unit2.pas :
Supprimer : {$mode objfpc}{$H+}
Supprimer dans le uses : FileUtil, LResources
Ajouter sous implementation : {$R *.dfm}
Et supprimer à la fin du fichier : initialization {$I unit2.lrs}
Ensuite ouvrir le project sous Delphi
Recharger l'icone du projet
Ouvrir la form1 ignorer les erreurs
Recharger l'image dans ImageBus
Ouvrir la form2 ignorer les erreurs
Tous enregistrer et compiler
Normalement c'est bon.
@+ yanb
Bacterius
Messages postés3792Date d'inscriptionsamedi 22 décembre 2007StatutMembreDernière intervention 3 juin 201610 23 juil. 2010 à 07:40
Le source en lui-même est lisible en Delphi à deux-trois détails près, mais je pense pas que la fiche puisse être lue malheureusement. Il doit bien exister des convertisseurs mais bon ..
3 nov. 2010 à 17:18
Je pense à ceux qui doivent fumer une cigarette à heure fixe (pour rencontrer une collègue d'un autre service, ou pour éviter le boss).
Je suis sûr qu'on pourrait ouvrir une boîte à idées, non ?
18 août 2010 à 15:40
18 août 2010 à 15:22
Créer un logiciel pour voir le départ d'un bus est à mon sens tout à fait inutile. Je vais créer un logiciel pour savoir si il n'y a pas un fou qui va emboutir ma voiture serais plus utile à l'heure actuel.
Bien à vous ...
Dr. J.LOMBET
23 juil. 2010 à 10:30
Pour tester sous delphi rien de bien compliqué mais un peu de gymnastique
Extraire dans un répertoire les fichiers
Unit1.pas et Unit1.lfm
Unit2.pas et Unit2.lfm
Project1.lpr
autobus.png et icone.png
Rennomer les fichiers .lfm par .dfm
Rennomer le fichier .lpr par .dpr
Ensuite dans un editeur de texte comme NotePad++
Dans project1.dpr :
Supprimer : {$mode objfpc}{$H+}
Modifier le uses complet par :
uses
Forms,
Unit1 in 'Unit1.pas',
Unit2 in 'Unit2.pas';
{$R *.res}
Supprimer la ligne : {$I project1.lrs}
Dans Unit1.pas :
Supprimer : {$mode objfpc}{$H+}
Supprimer dans le uses : FileUtil, LResources, EditBtn, RTTICtrls
Ajouter sous implementation : {$R *.dfm}
Modifier dans la procedure TForm1.TimerSurveillanceTimer(Sender: TObject);
Q : Float; par Q : Extended;
Et supprimer à la fin du fichier : initialization {$I unit1.lrs}
Dans Unit2.pas :
Supprimer : {$mode objfpc}{$H+}
Supprimer dans le uses : FileUtil, LResources
Ajouter sous implementation : {$R *.dfm}
Et supprimer à la fin du fichier : initialization {$I unit2.lrs}
Ensuite ouvrir le project sous Delphi
Recharger l'icone du projet
Ouvrir la form1 ignorer les erreurs
Recharger l'image dans ImageBus
Ouvrir la form2 ignorer les erreurs
Tous enregistrer et compiler
Normalement c'est bon.
@+ yanb
23 juil. 2010 à 07:40
Cordialement, Bacterius !