Les unités de Pure Pascal (langage Pascal pour les ordinateurs de la gamme Atari ST), compatible Turbo Pascal.
Unité GEM : Fonction scrp_read
Déclaration
function scrp_read( var sc_rpscrap : String ) : Integer;Description
Lit le chemin d'accès au répertoire dans lequel les données du presse-papiers sont enregistrées. Si une chaîne vide revient, il faut utiliser 'C:\\CLIPBRD\\' si le lecteur C existe, sinon 'A:\\ CLIPBRD\\', et enfin définir le répertoire avec scrp_write . Les fichiers dans le répertoire du presse-papiers doivent toujours avoir le nom 'SCRAP' avec une extension qui dépend du format ('.TXT' pour les fichiers texte, pour plus d'informations, voir "Livre professionnel").Paramètres
- sc_rpscrap Résultat : Nom du chemin du répertoire du presse-papiers
Résultat
0 en cas d'erreurRéférences croisées scrp_write
Exemple
{ Trouver le chemin du presse-papiers } if scrp_read(clipBoardPfad) <> 0 then begin if clipBoardPfad = '' then begin if Dsetdrv( 2 ) and (1 shl 2) <> 0 then clipBoardPfad := 'C:\\CLIPBRD\\' else clipBoardPfad := 'A:\\CLIPBRD\\'; scrp_write(clipBoardPfad); end else begin if clipBoardPfad[Length(clipBoardPfad)] <> '\\' then clipBoardPfad := clipBoardPfad + '\\'; end; end;
Vous trouverez dans cette zone la liste de toutes les Unités (équivalent des "Librairies" en C) de Pure Pascal. Les Unités indiqués comme standards existent dans la majorité des compilateurs Pascal existant sur ordinateurs 16 bits et au dela (dont Turbo Pascal 3 mini). Les unités indiqués comme Atari sont spécifiques aux systèmes d'exploitation des Atari ST (TOS n.n).
Accès aux unités
Les menus déroulants de chaque unité sont des accès directs aux procédures et fonctions, classés alphabétiquement (sans tenir compte de la casse, puisque le langage Pascal ne tient pas compte de la casse!)Cette page Unités est issu du fichier UNIT.HLP de la documentation de Pure Pascal (d'Application Systems Heidelberg), qui a été convertie en format TXT puis traduite de l'Allemand grâce à Google Translator : des milliers de copier/coller de et vers Google translator ont été nécessaires, ne connaissant pas un mot d'Allemand!