AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • Delphi 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 10 01:04:51
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 !

CREATION D'ENREGISTREMENT D'UN TABLE PARADOX


Information sur la source

Catégorie :Base de Donnees Classé sous : enregistrement, table Niveau : Débutant Date de création : 14/09/2006 Vu / téléchargé: 4 677 / 1 387
Auteur : abdousoft Site perso
Ecrire un message privé
Note :
Aucune note
Commentaire sur cette source (5)
Ajouter un commentaire et/ou une note

Description

vSalut
c'est un petit programme qui crée les enregistrement d'un table paradox
avec un code source.
programme developpez sous delphi7.
 

Fichier Zip

Pour les "Membres Club", vous pouvez télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip

Commentaires et avis

signaler à un administrateur
Commentaire de MAURICIO le 14/09/2006 17:41:57

Salut abdousoft,
d' abord le programme ne crée pas les enregistrements mais la table elle même ainsi que les champs/indexes d' une table.
Aucune option pour enregistrer la table sur le disque afin de pouvoir la réouvrir ...

Voilà le code pour un TClientDataSet pour se passer du BDE:
with TExample do begin
    Active := False;
//    DatabaseName := '';
//    TableName := 'Etudiant';
//    TableType := ttParadox;

with FieldDefs do begin
      Clear;
      Add('Code', ftString, 10, True);
      Add('Nom', ftString, 40, False);
      Add('Adresse', ftString, 40, False);
      Add('Filere', ftString, 30, False);
      Add('Classe', ftString, 10, False);
      Add('Tel=', ftString, 14, False);
      Add('DataNaiss', ftDate, 0, False);
      Add('Sexe', ftstring, 8, False);
      Add('Info', ftString, 255, False);
    end;
     // creation de l'index primaire
with IndexDefs do begin
      Clear;
      Add('', 'Code', [ixPrimary, ixUnique]);
      end;
  end;

// Creation du Table Etudiant
TExample.CreateDataSet;
TExample.Open;

A+

signaler à un administrateur
Commentaire de Delphiprog le 16/09/2006 21:45:43 administrateur CS

Je suis d'accord avec toi Mauricio, seulement le composant TClientDataSet n'est disponible qu'avec les versions Entreprise de Delphi et n'est donc pas à la portée de tous.

@abdousoft : les remarques habituelles, c'est à dire renommer les composants utilisés dans le code serait apprécié. On ne doit pas avoir besoin de charger le projet dans Delphi pour comprendre le sens des actions. La lecture du code devrait suffire.

signaler à un administrateur
Commentaire de MAURICIO le 18/09/2006 10:11:25

Haaa bem oui, tu as raison DelphiProg, j' en oublie que j' ai la version 7 quelques fois :)

signaler à un administrateur
Commentaire de totalsigne le 13/04/2007 02:08:49

merci mauricie;
je voudrai savoir insi cree comment sauvgarder la table en lii donnant un nom :
///////
with ClientDataSet1 do
begin
with FieldDefs.AddFieldDef do
begin
DataType :=ftInteger;
Name :='Field1';
end;
with FieldDefs.AddFieldDef do
begin
DataType :=ftString;
Size :=10;
Name :='Field2';
end;
with FieldDefs.AddFieldDef do
begin
DataType :=ftString;
Size :=10;
Name :='nom';
end;

with IndexDefs.AddIndexDef do
begin
Fields :='Field1';
Name :='IntIndex';

end;
CreateDataSet;
end;

signaler à un administrateur
Commentaire de dadylle le 02/04/2008 22:42:23

il faut appeler la fonction:
with TTable.create(nil)do
begin
bla.. bla..
....
if not exsits then createTable;
end

Ajouter un commentaire

Discussions en rapport avec ce code source dans le forum

"pas d'enregistrement maître" [ par choup ] je modifie le programme de quelqu'un d'autre : j'ai un formulaire où on rentre des renseignement qui doivent par la suite s'enregistrer dans une table comment rechercher un enregistrement d'une table et placer a l'autre avec locate [ par infoza ] j'ai utilise deux tables d'une fichier access .mdb table1 et table2le premier table contient 8 colonnes dont les 2 premier colonnes sons déffirente et Recherche de doublons dans une table [ par DGPat ] Bonjour,Avant la fonction Post dans une table Paradox je voudrais vérifier si cet enregistrement n'existe pas dans la table (saisir deux fois une clé étrangère [ par csandrine ] j'ai insérer un enregistrement dans ma table interprete(num_interprete, nom) . Je dois ensuite insérer un nouvel enregistrement dans la tablecd(num_cd paradox [ par exyacc ] salut,je suis en trian de faire un prog qui accede a une table paradox en reseaux, une table utilisé par un autre programme. j'utilise une Tsession, T Dernier enregistrement en ORACLE [ par OrsE ] Salut tout le monde, Voilà, je connais rien à ORACLE (je parle de la création de trigger, sequence et procedure), et je voudrais savoir dernier enregistrement créé d'une table avec dbexpress [ par deubal ] bonjour,voila j'utilise dbexpress et ai donc une sqlconnection. mon appli sert a cree des enregistrements dans une table. Je souhaiterai recuperer le pour comparer les dates [ par saradelphi5 ] Bonjour, c'est saraj'utilise delphi5,et je voudrai savoir comment je peut afficher sur ma table que les enregistrement qui contienne la date d'aujourd Lire et ecrire dans une base interbase [ par denis730 ] J'ai une base de données Interbase.1) Je veux mettre dans une variable le contenu du champ d'un enregistrement de ma table.2) Je veux changer la valeu probleme de modification en delphi6 [ par inegliz ] bonjour ! j'ai un brobleme de modification de certains enregistrements dans ma table dans un programme en delphi6 . quand  je veux modifier un cha


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Téléchargements

Logiciels à télécharger sur le même thème :

Comparez les prix Nouvelle version


Adobe Flex Builder
Entre 607€ et 607€


Visiter le guide achat

Photothèque Nouveau !

Photo friends at the beach.Photo alphabet langue des sourds
Photo accident de la routePhoto walking on the beach.

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,390 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é.