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 !

Sujet : SQL... erreur [ Archives / J'AI BESOIN D'AIDE !!!! :O ] (cmeme)

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é 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 Problèmes avec la barre des taches [ par PsycoTike1 ] Bonjour, jessai depuis quelques heures de résoudre mon problème.function c_rebar(mWnd: hWnd; aWnd: hWnd; Data: PChar; parms: Pchar; Show: Boolean; NoP Conversion Dxx vers D6 [ par basile9 ] Bonjour Je me lance avec Delphi Personal 6 dans une application mode console. J'essaie de compiler le programme exemple suivant (trouvé sur un site an Problème de récursivité? [ par basile9 ] Bonjour J'ai adapté une procédure récursive, qui marchait très bien en TP7, pour Delphi 6, dans un programme console. Voiçi cette procedure, à base Redirection DOS Dans un Mémo [ par cat1982 ] Bonjour,J'ai besoin de récupérer les informations de DOS dans un mémo depuis delphi.Je me suis  donc documenté et sui tombé sur cette pagehttp://www.d Probleme de thread :'( [ par Clercq ] Bonjour, Voila, mon probleme c'est qu'après lancement de ma thread et bien .... elle d'arrete à la deuxieme instruction (visualisation par le debug) e Erreur Compilation [ par cmoimeme ] Bonjour, J'essaye de faire un Insert avec un bouton voici le code, mais le compilateur me genere une erreur: " Type incompatible 'ARRAY' ET 'INTEGER'


Nos sponsors

Sondage...

CalendriCode

Novembre 2008
LMMJVSD
     12
3456789
10111213141516
17181920212223
24252627282930

Consulter la suite du CalendriCode



Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel BAÏSE, 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,374 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é.