port serieRésolu

Question

bonjour tous le monde.
je cherche comment lire a partir d'un fichier text caractaire par caractaire,et ecrire au meme temp sur des champs d'une table paradox avec delphi.
merci pour tous .

moldov · Accepted Answer

Bonjour,

Pour commencer je vois pas le rapport avec le titre "Port Série" bref,
Alors pour extraire des données d'une ligne de ton fichier texte tu peux faire ca

if opendialog.execute then
assignfile(F,opendialog.filename);

reset(F);

while not eof(F) do begin                 //cette boucle répètera la lecture 
d'une ligne tant que nous n'aurons pas atteint la fin du document EOF
    readln(F,lig);                                //à chaque fois que l'on utilisera readln on 
passera à la ligne suivante.

    mot1 := AnsiLeftStr(lig,5);               // Récupère les 5 premiers caractères de ta ligne
    mot2 := AnsiMiddleStr(lig,6,7);     // Récupère à partir du 6ème caractère ainsi que les 7 suivants
    mot3 := AnsiRightStr(lig,3);             // Récupère les 3 derniers caractères de la ligne
    memo.lines.add(lig);                   // ajoute notre ligne au memo
end;

closefile(F);                                    //cette procédure ferme notre fichier F

En vert tu retrouve la méthode général de lecture d'une fichier que j'ai repris dans le liens que ta filéFrancky23012301 qui est qui très bien au passage et tres compréhensive.
En Rouge voici des procédures qui peuvent te servir pour extraire une partie de ta ligne en mots.
Voila tu a toutes les cartes en main pour le faire.

Bonne Prog

Francky23012301 · Answer

Salut,

Pour les tables paradox c'est ici

Pour lire un fichier text c'est ici

@+

saimslim · Answer

merci pour l'explication des fichiers
actuellement moi je traite un fichier txt.comment?
je lis par exemple les 5premier caractaire de la premiere ligne,et je met dans une table,apres les 7caractaire de la meme ligne et je met dans un autre champ de la meme table et aisi de suite.
mais j'arrive pas comment faire
                                salutation

saimslim · Answer

bonjour
je te remerçie beaucoup pour le detaille.
le titre port serie c.a.d moi je reçois les donnees apartir d'un standard telephonique a traver le port serie.
ces donnees seront mise dans un memo ,et moi j'aime bien recupere directement et je le met dans une table.
                            salutation

jlen100 · Answer

salut utilise un composant pour le port serie par exemple TCOMPORT 
salut
Jlen

saimslim · Answer

ok merci,j'ai deja utilise ce composant,mais je cherche la lecture caractaire par caractaire avec ce composant.
                                  salutation.

jlen100 · Answer

tu peux soit utiliser l'évènement onrxchar dans ce cas on charge les données en buffer et on les récupère ensuite caractère par caractère
soit on utilise un timer de scrutation et comme si dessus

Jlen

jlen100 · Answer

Salut à tous petit passage par CS entre 2 voyages

Profitez en pour aller voir les nouveautés sur 
jlen.fr

JLEN

Port serie

8 réponses

Votre réponse

Discussions similaires