Une database

0/5 (10 avis)

Vue 11 432 fois - Téléchargée 2 677 fois

Description

il s'agit d'un serveur de gestion de database, tres rapide.
un exemple est donner avec pour expliquer comment l'utiliser.

Conclusion :


cette database gere tout type de donneees sauf les binaires, mais une mise a jour pour la gestion des donnees binaire serait bientot disponible.

Codes Sources

A voir également

Ajouter un commentaire Commentaires
cs_bassma
Messages postés
6
Date d'inscription
mercredi 11 avril 2001
Statut
Membre
Dernière intervention
10 août 2005

10 août 2005 à 06:42
Deja 3 ans (presque).
En fait le fichier n'est plus disponible sur http://www.freebase.tuxfamily.org/, puisque le serveur a été hacke il y a peut être 1 ou 2 ans et les fichiers ont été supprimés.

Sinon, la Freebase a subi d'ènorme modification et actuellement c'est la version V3 et elle sert de database pour SoftaMedCab, un logiciel de gestion de cabinet médical gratuit disponible sur http://www.softamed.com .


Bonne continuation
Bassma
cs_bassma
Messages postés
6
Date d'inscription
mercredi 11 avril 2001
Statut
Membre
Dernière intervention
10 août 2005

28 oct. 2002 à 04:28
il s'agit d'une freebase, la source sera disponible sur http://www.freebase.tuxfamily.org/fonctions.php

C'est un projet open source. Tout ceux qui ont envie d'y participer seront le bienvenue.
cs_Nono40
Messages postés
962
Date d'inscription
mercredi 3 avril 2002
Statut
Membre
Dernière intervention
12 septembre 2006
2
14 oct. 2002 à 23:16
Effectivement avec des minuscules, ça fonctionne bien ! Ce n'est pas un problème, le tout est de le savoir.

Pour la strcuture des fichiers c'était surtout des remarques comme ça, il n'est pas nécessaire de tout changé. Je n'ai pas essayer de faire des tests de vitesses. Et je suppose que l'objet de la dll n'est pas de remplacer Oracle 8. J'ai vu que tu gérais bien l'ouverture multiple d'une base par plusieurs programme sur le même PC.

J'ai aussi une idée, mais ce n'est sans doute pas évident : il faudrait créer TMaTableBase descendant de TDataBase pour gérer tes bases de données. Ainsi on pourrait utiliser toutes les interfaces toutes faites de Dephi sur la gestion des BDD... ( c'est juste une idée comme ça ... )

Bonne continuation...

Nono.
cs_bassma
Messages postés
6
Date d'inscription
mercredi 11 avril 2001
Statut
Membre
Dernière intervention
10 août 2005

14 oct. 2002 à 03:26
Ah, je n'ai pas reussi a me coucher avant de trouver le pb.
Tout vient du fait que tu utilise des majuscule dans les noms de field.
Avec les minuscules tout va s'arranger , ca fonctionne avec les minuscules.
utilise colb au lieu de COLB. et tu verras ca marche.
Tu tiens vrament a utiliser des majuscules dans les nom de field ??? c'est peut etre le seul bug (majuscule).

Bon, ca fait un moment que je n'ai pas touche a la classe table. j'ai peure de tout casser. mais je m'y metterais bientot.
cs_bassma
Messages postés
6
Date d'inscription
mercredi 11 avril 2001
Statut
Membre
Dernière intervention
10 août 2005

14 oct. 2002 à 03:00
Encore une chose, j'ai que 5 types pour simplifier les choses, comme ca on est pas limite si on a envie de changer la taille d'un enregistrement.

Et puis la table est peu rapide, donc mieux vaut creer des records (ex reccreatefromtable) permet de transformer ta table en record que tu peux par la suite travailler dessus dans la RAM (modifier 50 fois si tu veux ton enregistrement) et a la fin tu fais RecUpdateRecord, ceci vas upgrader ta table (et ecrit les donnes dans la table.

Mais c'est bizzare que tabgetnumfield n'a pas marche !!!!!!!!!!!
je viens de verifier ca marche. peux tu me donner ta fonction ???
d'abord verifier que

1 -le serveur est ouvert.
2- verifier que le nom du field est bon.


numfield := udll.tabgetnumfield(numtab,str1); doit obligatoirement marcher car sinon, l'exemple ne fonctionnera pas pour afficher les donnees dans les memos.


Je m'explique, vas dans
procedure TForm1.btnnextClick(Sender: TObject);
et met showmessage(inttostr(numfield));
apres
if numfield >= 0 then begin intres := udll.tabgetfieldvalue(numtab,numfield); mme1.Text := string(intres); end;

tu recupereras la valeur de numfield (0 ca veut dire le premier champ)

salut
Afficher les 10 commentaires

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.