Interpreteur de requetes (delphi 6 - paradox)

Soyez le premier à donner votre avis sur cette source.

Vue 10 227 fois - Téléchargée 1 693 fois

Description

P'tit interpreteur de requete sous delphi 6 et paradox.

Permet tout simplement en entrant une requete sql
( exemple select * from clients)
de resortir les enregistrements de la base => clients.

Structure de celle - ci :
-------------------------

=> Id
=> Nom
=> Prenom
=> Adresse
=> Ville
=> Codepost

Tout est dans le .zip

La meme chose mais ....en php :-)

http://www.phpcs.com/code.aspx?ID=13384

Source / Exemple :


//envoit de la requete  par le boutton
procedure TForm1.BitBtn2Click(Sender: TObject);
var chaine : string;
begin
//envoit de la requete
 chaine:=edit1.Text;
 if (chaine ='') then     //erreur
 begin
Windows.Beep(100,500); //beep
showmessage('Veuillez insérer une requete ou cliquez sur le menu Divers');
edit1.SetFocus; // on place le focus
 end
 else
 begin
        database1.Open;
        query1.SQL.Clear;
        try
        begin
         query1.SQL.Add(edit1.Text); //ajout de la requete
        query1.Open; //ouverture de la table en query
        edit1.Text:=''; //edit a blanc
        end;
        except
        on edbengineerror do showmessage('Erreur de Requete Sql') ;
        end;
  end;
end;

Conclusion :


Enjoy

Http://membres.lycos.fr/annmysql

Codes Sources

A voir également

Ajouter un commentaire

Commentaire

Messages postés
89
Date d'inscription
mardi 17 juin 2003
Statut
Membre
Dernière intervention
30 avril 2020

Je tiens à remercier Jimmy69 pour son code qui est très détaillé, je ne serais encourrager tout le monde à en faire de même.

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.