Equivalences VB6 => Delphi (Pascal)

Salut, les delphistes.
Je poste une question chez vous car il semble que deplhi soit le langage de la communauté CS le plus proche de Pascal (je bosse avec le Pascal D'innoSetup)
Après avoir cherché sur le site et après ne rien avoir trouvé, j'aurais plusieurs petites questions à vous poser
aller je me lance.
Quelqu'un pourrait il m'indiquer (lien ou petit exemple)

1. Existe il un equivalent à la boucle For Each X In X.Col En Delphi(Pascal) enfin j'espère que cela existe sinon je suis mal
   
2. Existe un type de variable Date ?  (dans le but de comparer plusieurs Date) car je n'ai pas trouver non plus de TDateTime, TDate ou TTime comme j'ai pu le lire ici (pas reconnu par le compilateur InnoSetup.
3. Pourrait on me mettre (et m'expliquer) la syntaxe correcte pour un IF END IF; IF ELSE END IF, FOR .. NEXT

J'ai tout de même trouver une FAQ interressante pour Pascal mais je ne trouve rien de satisfaisant pour les 3 points ci dessus.
D'avance un grand merci à ceux qui pourront m'apporter un élément de réponse et/ou un lien approprié.
@+: Ju£i€n
Pensez: Réponse acceptée

Salut

je poste rarement ici vu tous les codes et astuces disponibles qui sont proposés ici
cependant je te propose le lien suivant même si ici c'est dispo tout autant

http://fbeaulieu.developpez.com/guide/sommaire.html


@+

Re,
Merci je vais aller regarder çà.
Je laisse le topic non résolu au cas où d'autres passeraient par là

@+: Ju£i€n
Pensez: Réponse acceptée

re salut

j'ai oublié le plus important : l'excellent http://delphi.about.com/

c'est plus fourni en tous cas

@+

salut,

as-tu lue les exemples de inno setup?

j'ignore quel sont les limitations du scripting de inno setup, mais comme tu peux utiliser des dll, tu dois pouvoir passer outre ces problèmes( cherche "CodeDll.iss")

TDateTime : c'est un double.

sinon, une collection de liens que je file au débutants:

Nouveau dans le monde Delphi:

Voici quelques liens utile pour débuter. A lire absolument (je sais pas si c'est les plus approrié a ton problème).
http://www.delphifr.com/tutoriaux/GUIDE-DEBUTANT-DELPHISTE_481.aspx
http://www.delphifr.com/tutoriaux/DELPHI-40-FONCTIONS-UTILES-CLASSEES-THEME_217.aspx
http://www.delphifr.com/tutoriaux/DELPHI-DECLARER-UTILISER-TYPES_177.aspx
http://www.delphifr.com/tutoriaux/CONVENTIONS-ECRITURE-IDENTIFIANTS-VARIABLES-METHODES-DELPHI_413.aspx

Rappelons que lire et comprendre des codes d'exemples est une excellent solution pour apprendre de nouvelle techniques!

un tuto:
http://fbeaulieu.developpez.com/guide/


Site de référence / cours / doc:

Autre site parlant  de Delphi
http://www.delphifr.com/annuaire.aspx?Cat=7
et plus particulièrement
[ Lien ]
( http://delphi.developpez.com/freewares/borland/)
[ Lien ]
www.google.com  ;-)


A+

Loda

---

Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.

Salut,
> Loda  Merci pour tes liens et pour avoir pris de ton temps pour répondre .
Arghhh, les exemples Inno Setup je les oublies tout le temps ceux là (merci)
Merci pour le TDate.

Je sais que lire et comprendre est la meilleure chose pour apprendre. je posais simplement quelques petites questions rapides auxquelles même après quelques temps passé à chercher sur Google et DelphiFr sans oublier F1 dans Inno Setup, je n'avais rien trouvé qui puisse m'aider. quant aux tutoriaux je les avait lu.

J'étais même aller sur développez. comme quoi quant on ne sais pas ou chercher, cela reste dûr de trouver facilement.

Je pense que je vais finir par me faire un EXE vite en VB6 et je l'appellerai depuis InnoSetup.
Je voulais simplement apprendre plus pas pour aujourd hui.
En tout cas merci

En attendant d'autres réponses. Google is my friend
@+: Ju£i€n
Pensez: Réponse acceptée

re,

content que cela t'aide.

"Je sais que lire et comprendre est la meilleure chose pour apprendre."
j'utilise presque toujours les mêmes  liens (et le text qui vas avec) pour les débutants. désolé si j'ai l'air d'inciter. Cela n'est pas mon but.

si t'as une question sans réponse, revient !

bon code,

Loda

---

Se poser les bonnes questions est le premier pas pour trouver les bonnes réponses.

Salut,
Merci (encore ) rt15

@+: Ju£i€n
Pensez: Réponse acceptée

AIDEZ MOI SVP ET MERCI
je suis debutant en DELPHI et j'ai un code fait en VB que j'aime bien traduire en delphi
j'ai fait un edit1 edit2 et un bouton ok
je rentre la densite dans edit1 ok je recois la dose dans edit2
voila le code en VB

Dim d(10), t(10) 'd signifie dose et t signifie densité

Dim j, s ' les compteurs

' Tsn densité sous etain et Dgamma dose

 

d(0) = 0

d(1) = 25

d(2) = 50

d(3) = 100

d(4) = 200

d(5) = 400

d(6) = 800

d(7) = 1000

d(8) = 2000

d(9) = 4000

d(10) = 8000

 

t(0) = 0

t(1) = 6

t(2) = 13

t(3) = 22

t(4) = 45

t(5) = 86

t(6) = 119

t(7) = 166

t(8) = 263

t(9) = 356

t(10) = 453

Tsn = InputBox("ENTREZ LA DENSITE F", "CALCUL GAMMA", 0)

Select Case Tsn

Case 0 To 5

s = 1

Case 6 To 12

s = 2

Case 13 To 21 '74 to 137

s = 3

Case 22 To 44

s = 4

Case 45 To 85

s = 5

Case 86 To 118

s = 6

Case 119 To 165

s = 7

Case 166 To 328

s = 8

Case 329 To 355

s = 9

Case 356 To 453

s = 10

Case Is > 453

Exit Function

End Select

MsgBox s

Select Case s

Case 1

Dgamma = ((d(s) - d(s - 1)) / (t(s) - t(s - 1)) * (Tsn)) + d(s - 1)    //   c'est la formule de calcul 1

Case 2 To 7

Dgamma = (((d(s) - d(s - 1)) / (t(s) - t(s - 1)) * (Tsn)) + (d(s - 1) - ((d(s) - d(s - 1)) / (t(s) - t(s - 1))) * (t(s - 1))))    // c'est la formule de calcul 2

Case 8, 9

Dgamma = d(s - 1) * Log(1 - ((2 * t(s - 1) - t(s))) * Tsn / (t(s - 1) ^ 2)) / Log(t(s) / t(s - 1)) - 1 // c'est la formule de calcul 3

End Select

DG = Dgamma(f)

MsgBox DG & " " & "mrem"