Section courante

A propos

Section administrative du site

Voici les différences les plus communes lorsqu'on utilise Delphi et Visual Basic (VB) :

Delphi Visual Basic
// ma remarque ' ma remarque
Byte Byte
Case valeur of
 0:instruction0;
 1:instruction1;
 2,3:instruction2et3;
 Else instructionpardefaut;
End;
Select Case valeur
Case 0
 instruction0
Case 1
 instruction1
Case 2,3
 instruction2et3
Case Else
 instructionpardefaut
End Select
Const constante = 1; Const constante = 1
Const Valeur : Integer = 10; Const Valeur As Integer = 10
Double Double
For I := 0 to 9 do Begin
...
End;
For I = 0 To 9 Step 1
...
Next
Function mafonction:typederetour;Begin
...
End;
Function mafonction() As typederetour
...
End Function
If condition Then instruction_vrai
Else instruction_faux;
If condition Then
 instruction_vrai
Else
 instruction_faux
End If
LongInt Long
Procedure maprocedure;Begin
...
End;
Sub maprocedure
...
End Sub
Procedure maprocedure(Var mavaleur:Integer);Begin
mavaleur:=0;
End;
Sub maprocedure(ByRef mavaleur As Integer)
...
End Sub
Repeat
Until condition_vrai;
Do
Loop condition_vrai
Single Single
TDateTime Date
Type MonEnregistrement = Record
...
End;
Type MonEnregistrement
...
End Type
Var Tableau : Array[0..9] of Integer; Dim Tableau(10) As Integer
Var Tableau : Array[15..25] of Integer; Dim Tableau(15 To 25) As Integer
Var Tableau : Array[15..25] of Integer; Dim Tableau(15 To 25) As Integer
Var Tableau : Array[1..10,1..5] of Integer; Dim Tableau(1 To 10, 1 To 5) As Integer
With label1 do Begin
 Caption := "Libelle";
 AutoZise := true;
End;
With label1
 .Caption = "Libelle"
 .AutoZise = true
End With
While I < 9 do Inc(I); Do While I < 9
 I = I + 1
Loop


Dernière mise à jour : Mercredi, le 24 juin 2015