Código PHP:
(1*) Private Sub Command1_Click()
(2*) Dim palabras() As String, i As Integer
(3) palabras = Split(Text1, " ")
(4) For i = LBound(palabras) To UBound(palabras)
(5) Combo1.AddItem (palabras(i))
(6*) Next
(7*) End Sub
Suponiendo que en la forma hay un txt multilinea, donde el usuario puede escribir lo que sea, y posteriormente separarlo por palabras para agregarlo a un combobox se me ha ocurrido poner el espacio blanco como delimitador(podría ser el enter o cualqueir cosa que se ocurra y para los fines que sean, bien podrian ponerse mas cosas o validarlas para juntarlas etc, pero sólo me interesa el dividir las palabras) considerando tambien el inicio del procedimiento su fin y hasta el "next" del for como lineas de código, e incluso el "Dim" ya que hasta podría precindirse de él (pero las buenas practicas de programación ante todo), vemos que en pocas lineas de código (y sobre todo muy pocas palabras) se ha hecho algo interesante
otro ejemplo es el clásico:
Código PHP:
Redim [Preserve] nArrayDinamico(elementos)
Ahorra muchisimo trabajo (bueno en realidad sólo si lo comparamos con c++)
Saludos
pd.- Me ha encantado la iniciativa de los códigos
Me imagino tambien que alguien más experimentado en delphi, se las ingeniará para hacer lo mismo en la misma cantidad de lineas y de forma entendible