AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 12 06:26:10
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

10 commentaire(s) de divadav sur des sources sur tout CodeS-SourceS

Le : 03/01/2008 07:53:31
Source : EVALUER/EXECUTER UNE CHAINE EN TANT QUE CODE
Si je ne me trompe pas, il faut mettre Microsoft.VisualBasic.dll en référence, puis importer System.VisualBasic (ou System.VisualBasic.Interaction) pour avoir accès à la fonction MsgBox().
Mais il faut bien garder à l'esprit que cette fonction n'existe que pour garder une forme de compatibilité entre VB.Net et VB6, comme tout ce qui se trouve sous Microsoft.VisualBasic.
En .Net pur, il vaut mieux utiliser System.Windows.Forms.MessageBox.Show() (avec à peu près les même paramètres qu'en VB6).
De même, l'utilisation de modules est déconseillée en VB.Net, il vaut mieux créer une classe ! ;)

En espérant avoir pu t'aider !

Le : 28/12/2007 11:11:21
Source : EVALUER/EXECUTER UNE CHAINE EN TANT QUE CODE
Merci.

Il me semble quand même que le code est assez différent, mais de toute façon, j'utilise le même objet et ses propriétés ne changent pas !!
Et puis je pense surtout que cet exemple est plus "accessible", plus compréhensible pour un débutant que ce qui est donné sur la MSDN...

Le : 26/12/2007 17:16:05
Source : BASE DE DONNÉES POUR SOURCE DE VB
Désolé si je t'ai vexé, c'est vrai que mon commentaire est pas super constructif...

Tu pourrais par exemple implémenter une DAL (Data Access Layer), une couche d'accès aux données qui permettrai de sélectionner une base de données OU de créer une base comme tu le fais...
De plus, implémenter un champ Date me parait une bonne idée...
Tu pourrais aussi permettre à l'utilisateur d'effectuer une recherche par mots-clés pour retrouver plus facilement un code...

Dans tous les cas, ce qui est sûr, c'est que tu es un vrai développeur : tu te développe tes propres outils, c'est sûrement le plus important !!

Le : 26/12/2007 16:19:35
Source : BASE DE DONNÉES POUR SOURCE DE VB
Hello !
Je doutes pas que tu as passé un peu de temps dessus, mais j'ai du mal à y trouver une réelle utilité... Un répertoire bien classé avec tes bouts de code fait aussi bien l'affaire, non ?
Et puis c'est vrai que ça manque de souplesse...

Le : 01/06/2005 20:56:40
Source : THUMBNAILS - AFFICHER DES IMAGES SOUS LA FORME DE VIGNETTES
Le composant est plutôt sympa, dommage que ce ne soit pas commenté...

Le : 26/05/2005 17:23:40
Source : INFORMATIONS SUR L'APPLICATION (VERSION, COPYRIGHT, ETC...)
Nan, c'est vrai que ton unité est plus sympa !! J'aurais du vérifier avant... Mais j'ai toujours eu tendance à réinventer la roue !!

Le : 03/11/2004 10:57:12
Source : COMPOSANT RACCOURCI GÉNÉRALISÉ VERSION 2
Et ensuite, il faut compiler le projet avec le paquet d'exécution DesignIde.dcp (dans Projet/Options)...

Et ça marche super bien !!

Merci Nono  ;-)

Le : 03/11/2004 10:31:32
Source : COMPOSANT RACCOURCI GÉNÉRALISÉ VERSION 2
J'ai trouvé !!

En fait, il faut ajouter DesignIde.dcp dans les requires du Paquet...

Le : 03/11/2004 09:53:17
Source : COMPOSANT RACCOURCI GÉNÉRALISÉ VERSION 2
J'arrive pas !!!  ;-p

J'ai Delphi 7, et j'arrive pas à installer le composant...

Comment qu'on fait ??

Le : 25/10/2004 17:45:27
Source : À L'AIDE.... LOOPER DANS UN TSTRINGGRID
Ben non, ça peu pas marcher....    ;-p

La boucle "FOR" est mauvaise...
Et la variable LIGNE doit être globale, ce qui veut dire que tu ne dois pas la déclarer dans la fonction, mais bien avant dans le code...

Au final, la fonction du bouton donne ça :
======================================
procedure TForm1.Button1Click(Sender: TObject);
begin
   with StringGrid1 do begin
      Rows[ligne].clear;
      cells[1,ligne]:=edit1.Text;
      cells[2,ligne]:=edit2.Text;
      cells[3,ligne]:=edit3.Text;
      cells[4,ligne]:=edit4.Text;
   end;

   Inc(ligne);

end;
==================================

Et la variable Ligne est déclarée ici :
==================================
var
  Form1: TForm1;
  ligne: Integer;

implementation
==================================

Ce qui donne :
==================================
unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, Grids, StdCtrls;

type
  TForm1 = class(TForm)
    StringGrid1: TStringGrid;
    Edit1: TEdit;
    Edit2: TEdit;
    Edit3: TEdit;
    Button1: TButton;
    Edit4: TEdit;
    procedure FormCreate(Sender: TObject);
    procedure Button1Click(Sender: TObject);
  private
    { Déclarations privées }
  public
    { Déclarations publiques }
  end;

var
  Form1: TForm1;
  ligne: Integer;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin

  with StringGrid1 do begin
    Cells[1,0] := 'Colonne 1';
    Cells[2,0] := 'Colonne 2';
    Cells[3,0] := 'Colonne 3';
    Cells[4,0] := 'Colonne 4';
  end;

  Inc(ligne);


end;

procedure TForm1.Button1Click(Sender: TObject);
begin
   with StringGrid1 do begin   // Point d'arrêt (cf ci-dessous)
      Rows[ligne].clear;
      cells[1,ligne]:=edit1.Text;
      cells[2,ligne]:=edit2.Text;
      cells[3,ligne]:=edit3.Text;
      cells[4,ligne]:=edit4.Text;
   end;

   Inc(ligne);

end;


end.
===================================

Voilà voilou !!

Et quand tu as un problème comme ça que tu ne comprends pas, tu peux suivre ta boucle en mettant un point d'arrêt : tu mets le curseur au début de ta fonction et tu appuies sur F5 : la ligne doit être surlignée en rouge.

Quand tu lance l'éxécution, tu click sur ton bouton, et le code arrive à l'endroit du point d'arrêt... Tu peux alors avancer étape par étape dans ton code en appuyant sur F7, et tu peux vérifier la valeur de tes variables en mettant le curseur dessus....

Et la prochaine fois, écris dans le forum au lieu de mettre une source : tu peux faire un copier/coller du code...

Keep Cool & Be Wild
          DivaDz


1


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Appels d'offres

Comparez les prix Nouvelle version


World in Conflict pour Windows
Entre 14€ et 33€


Visiter le guide achat

Photothèque Nouveau !

Photo sitges beachPhoto plage de nudistes
Photo alphabet langue des sourdsPhoto teamwork

Visiter la photothèque


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
Temps d'éxécution de la page : 0,203 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.