Recherche:

Exemple de création:


uses IniFiles;

procedure EcritureValeur(Const Valeur_X:String);
var fichier:TIniFile;
begin
Try
fichier:=TIniFile.Create('c:\mon_fichier.ini');

Donc la solution est la suivante: 8-)


function CompareDate(const A, B: TDateTime): TValueRelationship;
begin
if Trunc(A) = Trunc(B) then
Result := EqualsValue
else if A < B then
...

Salut,

J'ai longtemps utilsé les DateTimePicker, mais un problème qui se pose..
le teste entre eux,


if DateTimePicker1.Date>DateTimePicker2.Date
then ShowMessage('...')

Voici la réponse:



Const Couleur_De_Selection=clBlue;
Couleur_1=clWhite;
Couleur_2=clRed;

procedure DrawGRID(Valeur TEdit;Const MyGrid:TDBGrid;Const State:TGridDrawState;
...

Il recommandé d'utiliser un "TDateTimePicker", si non tu doit gérer les
exceptions comme ceci..



var Date:TDate;
begin
Try
Date:=StrToDate(Edit1.Text);
Except

Voici un petit exemple;

code de l'unité n°1

Code :


Unit Unit1;
interface

Essaye plutôt d'ajouter cette fonction;

function CorrectNumber(Const nb:String):Boolean;
var i,L:Word;
begin L:=Length(nb); Result:=L>0;
for i:=1 to L do
if not (nb[i] in [0..9])
then...

Tous ce qui a été dit est vrais,
1) Vous devez apprendre à séparer vos differentes versions dans des endroits
différents.
2) Ne pas engueulez pas les fichiers du backup (*.~*) [Ne Pas Faire Des...

Essaye plutôt ça..


unit Unit4;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ComCtrls, StdCtrls, MPlayer, Menus, XPMan, ExtCtrls;

Voici un petit exemple;

code de l'unité n°2


Unit Unit2;
interface

function Func_Unit2:Boolean;

J'ai déja développé plusieurs programmes qui utilisent la souris, tu peut les essayer et de donner ton avis; :)
(->VOIRE CONTRIBUTION<-)...

Veux tu dire,

1) Avant d'installer "Linux"
2) Aprés d'installer "Linux"
3) J'ai pas utilisé un utilitaire de disque dure (genre PartitionMagic; ou autre.)
4) J'ai ajouter un nouveau matériel,...

Au lieu de tapez tous ça,



Cette ligne est trés satisfaisante:


Write('Le Chemin est: ', ParamStr(0))

Si tu a déja le code, ceci est trés simple; voici une idée:
1) reformulez votre code en une simple fonction;
ex:


function Convert(Const TTC:Word):String;
begin
{votre code ici}
...

si vous êtes sûr de y procéder, et vous avez fait des copies de sauvegarde de vos données personnels, je croit que c'est la meilleure chose a faire.

mais à noter!
tout le formatage doit être fait...

donc, essayez plutôt cette procédure:
Premierement fermer votre explorateur!, et faite:
Démarrer->Exécuter-> tappez 'COMMAND' -> OK
une fenaître MS-DOS devrez s'ouvrire, et essayer cela:

allez...

ce fichier a probablement un attribut soit 'SYSTEM/HIDDEN'
vous devez suivre ceci:

Panneau de configuration -> Options des dossiers -> AFFICHAGE

puis activer:
Afficher les fichiers et les...

Si on dit qu'on a un fichier text; et nous devont connaître le nombre
de caractère; c'est la fonction :
function FileSize:LongInt;

exemple:


Write('Le nombre de caractères du fichier est de...

le problème c'est que j'ai les SDK; mais en C++, et moi je n'arrive pas a les traduire pour DELPHI; s'il y'a un moyen de faire ceci voici les SDK que j'ai poster ici,

23223

merci. :roll:

je crois qu'enfin j'ai réaliser un p'tit code qui semble attractif à faire des éfforts pour le developper prochaînnement;

l'unité à utiliser :


unit bsd_api;
interface
uses
Windows,
...

j'ai essayer le code suivant, mais le système indique que le programme
à tenter d'exécuter une instruction non privilégiée ou quelle que chose
comme ça..



{écrire 1234h en 0040:0072 suivi...

Je suis un petit peu débutant en ASM; peut-être est-il utile de m'écrire un code que je puisse incorporer en Pascal.
a+ ;)

SE=MS-DOS 8.0
[je veux utiliser cette fonction avec un programme qui s'exécute avec le MS-DOS d'une disquette de démarrage créee par WindowsME] pour une fonction bien déterminée.

ENVIRONNEMENT de...

Comment Redémarrer Le PC PAR "ASM" ou directement en pascal ? 8O
a+ ;)

Salut! le Pogrammeur

ta fait un petit programme; mais je ne te décourage pas de le poster ici..
voyant..


Si tu n'utilise pas cette unité, vous pouvez de ne pas la définire dans
la clause...