begin process at 2010 02 10 09:56:33
  Trouver un code source :
 
dans
 
Accueil > Forum > 

Archive Delphi

 > 

Archives

 > 

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

 > 

SQL... erreur


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

SQL... erreur

dimanche 4 décembre 2005 à 15:24:41 | SQL... erreur

cmeme

Merci encore pour ton aide: je vais commenter le probleme.

En réalité, j'ai plusieurs bouton: Ajouter, Sélectionner, Modifier, Supprimer.
Ce que je voudrais réaliser en claire c'est lorsque je pointe le curseur de ma souris sur ma dbgrid pour selectionner le champs dans ma table FORMAT (réaliser en interbase) lorsque ce dernier est pointé, j'appuie sur le bouton Selectionner, ce bouton (Selectionner) m'affiche la donnée de mon champs TYPE_FORMAT de ma dbgrid dans mon Edit1 et de la je change le type de format au lieu de A4 j'ecris A3 et lorsque j'appuie sur le bouton Modifier le champs A4 dans mon dbgrid ce change en A3.



procedure TGes_Format.BitBtn5Click(Sender: TObject);

begin
 begin


   if  (edit1.Text = '')then
       begin
         messagedlg('Veuillez sélectionner le champs à modifier',mtWarning,[mbok],0);
       end
   else
       begin

         with DataModule2.IBQuery_Format do
           begin
             SQL.Clear;
             SQL.Add('Update FORMAT');
             DataModule2.IBQuery_Format.ParamByName('TYPE_FORMAT').AsString:=edit1.text;
             ExecSQL;
             BitBtn4.Enabled:=true;
             BitBtn6.Enabled:=true;
             edit1.Text := ''
           end;
       end;

end;
end;



J'ai essayé d'écrire ca comme code mais ca me fonctionne pas si qqu'un pourrait m'aider..

Merci encore
lundi 5 décembre 2005 à 14:53:33 | Re : SQL... erreur

vincentstryckmans

Bonjour,

Dans les composants Interbase Express il y a TIBDataset qui fait tout le travail pour toi.

Tu écris une requête SELECT pour ton dataset dans la propriété SELECTSQL ou via click droit 'Edit SQL', ensuite via un click droit ' Dataset editor' tu peux générer automatiquement les commandes INSERT, UPDATE et DELETE pour ta requête.
Dans ton code, tu n'as plus qu'à , par exemple, pour un update :

if not mytransaction.intransaction then mytransaction.starttransaction;
with myquery do
begin
    modify;
    fieldbyname('field1').as ... := valeur;
    ...
    post;
end;
if mytransaction.intransaction then mytransaction.commit;

Le tout emballé dans un try except.

Pour ton information, un update d'une table en sql s'écrit :
update mytable set field1 = 'toto' where .... donc ton code SQL.Add('Update FORMAT'); ne sait pas fonctionner car il devrait être  :
    sql.add('update format set type_format = :type_format');


Le forum SQL de www.developpez.com dispose d'un titutorial vachement bien fait sur les bases du SQL


Et comme disait ma grand-mère : il y a toujours du soleil derrière les nuages.
Vincent Stryckmans.

mardi 6 décembre 2005 à 00:12:30 | Re : SQL... erreur

cmeme

Mercii pour ta reponse je vais regarde ca tout de suite ;)
mardi 6 décembre 2005 à 12:08:49 | Re : SQL... erreur

cmeme

Réponse acceptée !

En faite voilà, voila la solution à mon probléme :

Voici la Source

var
OldType: string;

procedure TGes_Format.Modifier_FormatClick(Sender: TObject);  //Bouton pour "Modifier"
begin
begin
  if  (edit1.Text = '')then
  begin
    messagedlg('Veuillez sélectionner le champs à modifier', mtWarning,[mbok],0);
  end
  else
  with DataModule2.IBQuery_Format do
  begin
    SQL.Clear;
    SQL.Add('Update FORMAT set TYPE_FORMAT=:Type_Format');
    SQL.Add('WHERE TYPE_FORMAT = :OldType');
    DataModule2.IBQuery_Format.ParamByName('Type_Format').AsString:=edit1.text;
    DataModule2.IBQuery_Format.ParamByName('OldType').AsString:=OldType;
    ExecSQL;
    Refresh_Format.Click; //Bouton qui rafraichi
    edit1.Text:='';
    Ajouter_Format.Enabled:=true;

  end;
end;
  end;


Voila voila ...



Cette discussion est classée dans : bouton, end, sql, format, begin


Répondre à ce message

Sujets en rapport avec ce message

Unicode SQL [ par domchap ] salutje fais un prg pour aider à apprendre le polonais, tout de suite j'ai été confroté au problème des lettres de la langue, j'ai donc utilisé l'unic bouton dynamique [ par killerdam ] bonjour. j ai créé des pages control et des tabsheet dynamiquement, et sur chaque je créé aussi un bouton, un edit, une colorbox (tout ca dynamiquemen Probleme de requete UPDATE pour modifier de champs dans ma dbgrid [ par cmeme ] Salut merciii à l'avance pour votre aide ;) Voila mon code mais la requete ne fais rien , elle change rien dans ma DBgrid < Affichage du contenu d'une colonne? (voici mes codes) [ par jennybless ] Salut tout le monde! Je travaille sur une toute petite base de donnée et souhaite juste avoir le contenu d'un champ (par exemple: Entreprise). C'est SavetoFile ne fonctionne pas avec D2005 , [ par MarcelF ] Bonjour,J'ai un pb avec D2005, je voudrais sauver le contenu du clipboard dans un fichier. Ceci fonctionnait sans pb avec Office 2003.Avec Office 2007 Error E/S 32 sur ecriture et suppresion [ par te56350 ] slt tt le mondej'Ai besoin d'une solution pour mon projet en cour SVPMon projet gère des comptes utilisAteurs Et qu'An j'enregistre des comptes çA fon Dichotomie Pascal [ par uesgui ] Bonjour,J'ai récupéré un code pour faire un exercice de maths sur la dichotomie , j'ai bidouillé le code pour l'adapter à mon exercice mais je ne trou Fermer Forms Dynamiques [ par nirG ] Bonjour,Je recherche une façon de fermer mes forms dynamiques. Je vous présente un bout de mon code afin que vous compreniez.for I := 0 to Compteurcha l'algorithme du pivot total de gauss en delphi [ par etoilefilante21 ] aidez moi svp.j'ai un probleme avec mon algorithme je sais pas ou sa cloche mais les resultat sont faux.voila mon algorithme.bein je suis debutante do Rajouter un TreeNode dans un TreeView [ par Francky23012301 ] Salut à tous,Je suis entrain de réaliser un composant dont voici le code :unit BrowserEffects;interfaceuses  Windows, Messages, SysUtils, Classes, Con


Nos sponsors


Sondage...

Comparez les prix

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 : 13,447 sec (3)

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