begin process at 2010 02 10 08:03:11
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Delphi

 > 

Archives

 > 

J'AI BESOIN D'AIDE !!!! :O

 > 

Plantage


Derniers messages déposésPoser une question dans le forum ou lancer une discussion

Plantage

mardi 18 mai 2004 à 23:53:56 | Plantage

Rapakooti

Je solicite votre ade car en fait j'ai un gros plantage avec un programme que je suis en train de faire et pourtant il est pas encore avancé une fois sur deux presque j'ai une erreur d'ecriture mémoire quand je ferme le programme j'ai éssayé de chercheen rajoutant des trucs ( que j'ai laissé ) je vous mes mes deux première fiche si vous avez une idée


MAIN.pas:

unit emplacement;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Buttons, StdCtrls, ComCtrls, inifiles, ShellCtrls;

type
TForm2 = class(TForm)
ShellTreeView1: TShellTreeView;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
Label1: TLabel;
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }

end;

var
Form2: TForm2;

implementation

uses main;

{$R *.dfm}

procedure TForm2.BitBtn2Click(Sender: TObject);
begin
form1.Visible:=true;
form2.Visible:=false;
end;

procedure TForm2.BitBtn1Click(Sender: TObject);
begin
Form1.emplacementdes:=ShellTreeView1.Path;
form1.FileListBox1.Directory:=Form1.emplacementdes;
form2.close;
form1.Visible:=true;





end;

end.


Emplcement.pas:



unit emplacement;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, Buttons, StdCtrls, ComCtrls, inifiles, ShellCtrls;

type
TForm2 = class(TForm)
ShellTreeView1: TShellTreeView;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
Label1: TLabel;
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }

end;

var
Form2: TForm2;

implementation

uses main;

{$R *.dfm}

procedure TForm2.BitBtn2Click(Sender: TObject);
begin
form1.Visible:=true;
form2.Visible:=false;
end;

procedure TForm2.BitBtn1Click(Sender: TObject);
begin
Form1.emplacementdes:=ShellTreeView1.Path;
form1.FileListBox1.Directory:=Form1.emplacementdes;
form2.close;
form1.Visible:=true;





end;

end.


En vous remerciant d'avance


R A P A K O O T I
mercredi 19 mai 2004 à 08:03:09 | Re : Plantage

DRJEROME

Essaie plutôt avec les fonctions :

form1.Show

et

form1.Hide
mercredi 19 mai 2004 à 11:03:12 | Re : Plantage

Rapakooti

Merci de ta réponse je viens de testé ça change rien
désolé
R A P A K O O T I
lundi 24 mai 2004 à 08:11:09 | Re : Plantage

Kruger

Ferme ton application en utilisant
ExitProcess(0);
et utilise .show et .hide au lieu de visible ( form1.show; ).
Et c'est quoi ça: Form1.emplacementdes;
?

--==[Kruger]==--


Cette discussion est classée dans : sender, procedure, form1, tobject, tform2


Répondre à ce message

Sujets en rapport avec ce message

Erreur dans un mémo [ par Francky23012301 ] Salut à tous Je suis entrain de faire un serveur TCP. Normalement il y a différent boutons et Edit ainsi qu'un mémo nommé MODE. Dans l'Edit1 J'écri arriere plan [ par maxioutils ] Bonjour comment on fait pour mettre un arriere plan dans une fiche voila j'ai ce code mais ça ne marche pas : var Bitmap: TBitmap; procedure TForm Une source liée à MsDos qui ne fonctionne pas [ par Francky23012301 ] Salut à tous j'avais lancé le débat sur la possibilité d'ouvrir une invite MsDos et de l'incruster dans une FORM. Divers solutions m'avaient été propo envoyé donnés au port usb [ par didi59650 ] Voila j'ai fait un programme qui fonctionne tres bien (stage). La liaison entre mon appareil de mesure et le PC est faite par le port serie. j'ai du c Image de webcam vers un avi [ par ipeteivince ] Salut@ tousvoila, j'ai écrit une petite application qui utilise le composant tcamera pour travailler avec une webcamCe qu'elle fait pour l'instant, el probleme de click entre un temps [ par maxioutils ] Voila le code presque complet :unit Unit6; interface uses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtr Filtrer les données de DBGrid à partir de ADOQuery [ par Cobuce ] Salut,J'execute un module pour filtrer un DBGrid sur ADOQuery.  En fait j'ai deux problème :1. Utiliser le Filter à partir de RzEdit et garder juste l problème affichage image [ par davibz ] Bonjour,    Je viens de débuter avec delphi et j'ai qq soucis avec ma page de chargement. J'ai une image et une progressbar dans ma fenetre chargement Inclure un graph sous delphi?? [ par bm3w325i ] Bonjours, je viens de me lancer dans delphi car j ai besoin d utiliser un media palyer pour diffuser la video par la sortie video de ma carte de decom Récupération d'une valeur [ par ouaich85 ] Bonjour, voici mon code : unit Unit2; interface uses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrl


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,265 sec (4)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales