Classe data - restore
Description
Bonjour à tous,
Pour les anciens, une petite classe pour émuler les anciennes instructions du BASIC ( je vous parle d'une époque révolue depuis longtemps ) : DATA, READ & RESTORE
DATA stocke des données de tout type, READ lit la prochaine donnée, et RESTORE repositionne en début de liste, ou sur une étiquette définie par ETIQ
Je sais que ça ne sert a rien, mais je ne savais pas quoi faire cet aprèm :)
Ce code est fait avec Lazarus, donc devrait être facilement porté sous Delphi ( que je n'ai plus )
Un exemple d'utilisation est fourni ( c'est la moindre des choses ), et le code est commenté dans les grandes lignes.
Pour les anciens, une petite classe pour émuler les anciennes instructions du BASIC ( je vous parle d'une époque révolue depuis longtemps ) : DATA, READ & RESTORE
DATA stocke des données de tout type, READ lit la prochaine donnée, et RESTORE repositionne en début de liste, ou sur une étiquette définie par ETIQ
Je sais que ça ne sert a rien, mais je ne savais pas quoi faire cet aprèm :)
Ce code est fait avec Lazarus, donc devrait être facilement porté sous Delphi ( que je n'ai plus )
Un exemple d'utilisation est fourni ( c'est la moindre des choses ), et le code est commenté dans les grandes lignes.
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.