Interpreteur de requetes (delphi 6 - paradox)

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

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.