Delphi VS Visual Basic

[HCammus]

Holas, que pena me han saludado como 3 veces y ni por enterado me he dado, mis disculpas por ello.

Sería ilógico defender lo que hace una persona que "odias", no???, nunca me han gustado las formas de proceder de los gringos ni siquiera en cuanto a tecnología se refiere y a decir verdad este Bill Gate me cae como una patada en el culo, la gente rastrera siempre la he odiado y este ha demostrado ser uno de esos.

Caral solo te falto mencionar que solo lo usan los principiantes , recuerda: En ocasiones lo práctico no resulta ser tan práctico y no toda señal de eficiencia es sinonimo de inteligencia

--------------------------------------------------------------------------

egostar gracias por ello, pasare a leerlas nuevamente, si notaras llevo casi 2 años en este foro, pero NUNCA había opinado, estuve durante casi 3 meses batallando con un programa hecho en Delphi (creo que por ello me registre aquí hace un par de años) de una persona que realmente no debería de fomarse de ser programador de dicho lenguaje cuando ni siquiera sabe como estructurar bien uno, es que si lo oyeran hablar hasta rabia le cojerían al pobre lenguaje (sin este tener la culpa), yo creo que dicho personaje debería estar por esta comunidad ya que se autoproclama como el DIOS de la programación así que supongo que por acá tal vez han tenido que lidiar con semejante especimen.

Para no herir susceptibilidades la palabra pobre descrita en el último parrafo se refiere al sentido infortunio.

[OSKR]

HCammus:

Sería ilógico defender lo que hace una persona que "odias", no???, nunca me han gustado las formas de proceder de los gringos ni siquiera en cuanto a tecnología se refiere y a decir verdad este Bill Gate me cae como una patada en el culo, la gente rastrera siempre la he odiado y este ha demostrado ser uno de esos.

Bueno... VB es de M$ y M$ era de Bill gates...Delphi y Builder de la Borland

[[egostar]]

Empezado por HCammus

egostar gracias por ello, pasare a leerlas nuevamente, si notaras llevo casi 2 años en este foro, pero NUNCA había opinado, estuve durante casi 3 meses batallando con un programa hecho en Delphi (creo que por ello me registre aquí hace un par de años) de una persona que realmente no debería de fomarse de ser programador de dicho lenguaje cuando ni siquiera sabe como estructurar bien uno, es que si lo oyeran hablar hasta rabia le cojerían al pobre lenguaje (sin este tener la culpa),

Tienes razón, pues que bueno que te decides a escribir, así que vale mi bienvenida.

Empezado por HCammus

yo creo que dicho personaje debería estar por esta comunidad ya que se autoproclama como el DIOS de la programación así que supongo que por acá tal vez han tenido que lidiar con semejante especimen.

Ah pues con esa descripción habemos muchos por aquí.

Empezado por HCammus

Para no herir susceptibilidades la palabra pobre descrita en el último parrafo se refiere al sentido infortunio.

Que bueno que lo aclaras, porque Caral ya estaba afilando las uñas,

Salud OS

[ucanneo]

Creo que he llegado algo tarde al debate, bueno casi a la masacre de VB.

El mayor argumento a favor de VB es un hecho de la vida misma

"El hablar más de un idioma"

Si bien es cierto que no es indispansable, es muy útil a la hora de conseguir algo como programador. No siempre somos los que llevamos la batuta del equipo de trabajo así que hay que saber adaptarse o morir

Otro argumento a favor es la situacion que se pesenta por igual a programadores y animadores, "La facilidad y rapidez" ya no digamos eficiencia o tiempo si a fin de cuentas no hay diferencia entre uno y otro (como cuando quieres modelar objetos complejos en max, es mejor usar el zbrush)

Personalmente he usado por igual Delphi, Builder y Visual Basic para aplicaciones diferentes (controlar dispositivos, motores de paso, continuos, joysticks, aplicaciones OpenGL, graficos, bases de datos, etc. etc. ) y siempre uso el que los maneje más facilmente ya que la eficiencia de compilación, rapidez etc etc quedan relegados a segundo termino por la funcionalidad y facilidad (Actualmente hasta la maquina de escritorio más sencilla ya hace rápido el trabajo)

Por lo tanto diré que el VB es bueno, y no solo bueno, muy bueno, ya que como dijera Homero Simpsom de la TV "Es un buen amigo, pide poco y da mucho", es un error el considerarlo para principiantes, normalmente solo los principiantes lo consideran así. He de decir que es muy util eso de no diferenciar mayúsculas y minúsculas (el Option Explcit lo es igual de importante).
Algo muy interesante es lo que me ha pasado cuando hago algun trabajo con otras personas en builder y en VB, y es que si tu eres quien recibe códigos cuando alguien te los trae en "C o Delphi" no siempre son entendibles ya que a veces llenan de sentencias una sola línea, pero el problema no es ese (pueden haber hasta 100 sentencias siempre y cuando se entiendan ) el problema es que ¡La mayoria de las personas las hacen sin espacios! ¡¡ ignorando olimpicamente las buenas practicas de programación !!, es ahí donde el VB toma ventaja y les obliga (lo hace automaticamente) a alinear las cosas a dejar espacion entre las variables y sus asignadores (+,*,/) reduciendo el trabajo que implica integrar los códigos

Cuando inicié en el mundo de la programación lo hice en c++, potseriormente en java, y otros, VB lo aprendí por mi cuenta (Al igual que delphi) y he de decir que la curva de aprendizaje si es mas suave, pero no por ello deja de ser productiva, al contrario, al aprender más rápido 8que no quiere decir mejor) uno se entusiasma más .

Hay muchas cosas en las que otros lenguajes toman ventajas (Como cuando hay que trabajar con SQL o con openGL) pero no todo es miel sobre ojuelas ¿O si?

[jachguate]

Empezado por ucanneo

si tu eres quien recibe códigos cuando alguien te los trae en "C o Delphi" no siempre son entendibles ya que a veces llenan de sentencias una sola línea, pero el problema no es ese (pueden haber hasta 100 sentencias siempre y cuando se entiendan ) el problema es que ¡La mayoria de las personas las hacen sin espacios! ¡¡ ignorando olimpicamente las buenas practicas de programación !!, es ahí donde el VB toma ventaja y les obliga (lo hace automaticamente) a alinear las cosas a dejar espacion entre las variables y sus asignadores (+,*,/) reduciendo el trabajo que implica integrar los códigos

Bueno, si este es el problema, hay múltiples utilitarios para embellecer el código de casi todos los lenguajes conocidos, incluyendo obviamente pascal.

Francamente aborrezco los editores que ponen las cosas donde el editor quiere, y no donde yo quiero...

[Casimiro Notevi]

Permíteme, ucanneo, que ponga en duda el que conozcas Delphi, supongo que simplemente lo habrás visto y poco más. Es imposible,si conoces Delphi, que hagas esos comentarios.

[ucanneo]

Empezado por Casimiro Notevi

Permíteme, ucanneo, que ponga en duda el que conozcas Delphi, supongo que simplemente lo habrás visto y poco más. Es imposible,si conoces Delphi, que hagas esos comentarios.

siempre he sido de la idea que es bueno saber de todo, en realidad yo tambien estaba casado con Builder C++ hasta hace poco mas de 2-3 años, así como con 3dsMax, pero sucedio algo que me ha hecho no demeritar a ningun lenguaje sino el saber aprovechar las cualidades de cada uno de ellos

Aclaro que es experiecia personal, ( y lo remarco de nuevo ya que el hecho de que me sirva ami no quiere decir que sea en general )

Asistí a un congreso sobre programación y animación que se ofreció en Mérida, donde asistieron como ponentes personajes bastante interesantes (programadores y animadores por igual así como personalidades de Microsoft) y yo como simple espectador, pues bien sucedió que en una de las conferencias de un animador este nos mostró unas fotos con algunos personajes algo populares ( george lucas entre otros ), pues bien la razon de que haya estado con tante gente es que este tipo era el socio del animador más rapido del mundo (como ejemplo algunas animaciones de Warcraft, mientras en algun concurso les piden una animacion de algo este tipo llega ha hacer hasta 4 o 7 de calidad superior ) ¿pues bien cual era el truco? si el era un defensor incondicional de 3dsMax frente al maya, blender, amapi, Cinema 4d etc etc, incluso frente a renderman. Pues el secreto estaba en diversificar las herramientas, es decir, si necesitaba modelar un arma pues usaba ZBrush(Lord of the rings), si necesitaba hacer fluidos usaba realflow, etc etc, de tal forma que lo que hacia era aprovechas las ventajas de cada uno de ellos sin ver las carencias, y entonces todo lo integraba en Max y... ¡a chambear!
Luego un tipo de la Microsoft dio una coferencia sobre entornos de programación, donde se hizo patente que el mismísimo Microsoft usa una a una sus herramientas, es decir usa por igual el visual c que el Vbasic cada uno para lo que necesita
Luego otro tipo programador de video juegos igual usaba para cada cosa lo que más le conviene (Java, Delphi, BlitzBasic etc etc ) y todos ellos han aumentado su producción de forma asombrosa

Entonces decidí (No sólo yo, tambien la mayoria de las personas de mi grupo que andabamos por ahi ) el hacer lo mismo, y sucedió que nustra producción y calidad como estudiantes se vió mejorada (Ya hemos egresado) ya no usabamos solo una herramienta de trabajo, diversificamos y funcionó

Como ejemplo: en una ocasion nos mandaron a programar un soft que hiciera gant, si bien visual basic ya trae el componente Gant, es mejor hacerlo en delphi, es mas amigable, se ve mejor y se maneja mejor.
Pero en otra ocasion nos mandaron a hacer una simulacion de las tareas del procesador y saber cueles puede atender y cuales no, hasta que termine total que VB resultaba la mejor opción por sus tipos de variables y funciones ya regaladas como Trim, strings, en muy pocas lineas de código
Tambien como proyecto final de robótica construimos un robot que se me ocurrio podria manejarse automáticamente o por joystick, tomar fotos y otras cosas, por lo que se necesitaban manejar DLL´s propias de windows, y ahi fue donde visual tomó la delantera.
Pero por ejemplo si de graficacion en 3d (OpenGl, directX), o de generacion de informes estamos hablando VB no tiene nada que hacer frente a delphi, no hay discusión, Delphi es mejor y punto (y no me va a negar que eso ya no es chamba de novato)

En resumen


-No hay que ver solo lo malo, sino que ventajas podemos aprovechar de él para mejorar
-No es sano el cerrarse a pocas alternativas teniendo tantasy menos aún si es posible tener ambas (no como con otras cosas:P)

[Casimiro Notevi]

Efectivamente, cada trabajo requiere su herramienta, en eso estamos de acuerdo

[Neftali [Germán.Estévez]]

Empezado por ucanneo

...y es que si tu eres quien recibe códigos cuando alguien te los trae en "C o Delphi" no siempre son entendibles

No te molestes si te digo que eso es una ¡¡soberana tontería!!
No dudo que recibas código no-entendibles, pero asociar eso a los códigos de C o Delphi me parece algo sin sentido.

Quien es ordenado lo es programando en cualquier lenguaje y quien es desordenado lo es también en cualquier lenguaje.
¡¡Qué tendrá que ver el tozino con la velocidad!!

[Casimiro Notevi]

Todo el código fuente escrito en cualquier lenguaje es "entendible" según haya querido el que lo escribió.
Aquí adjunto algunos ejemplos de código claro, entendible y fácil de leer:

                                  #include\
                                  <stdio.h>
                     #include                <stdlib.h>
                     #include                <string.h>

                    #define w "Hk~HdA=Jk|Jk~LSyL[{M[wMcxNksNss:"
                   #define r"Ht@H|@=HdJHtJHdYHtY:HtFHtF=JDBIl"\
                  "DJTEJDFIlMIlM:HdMHdM=I|KIlMJTOJDOIlWITY:8Y"
                 #define S"IT@I\\@=HdHHtGH|KILJJDIJDH:H|KID"\
                "K=HdQHtPH|TIDRJDRJDQ:JC?JK?=JDRJLRI|UItU:8T"
               #define _(i,j)L[i=2*T[j,O[i=O[j-R[j,T[i=2*\
              R[j-5*T[j+4*O[j-L[j,R[i=3*T[j-R[j-3*O[j+L[j,
             #define t"IS?I\\@=HdGHtGIDJILIJDIItHJTFJDF:8J"

    #define y                  yy(4),yy(5),                yy(6),yy(7)
  #define yy(              i)R[i]=T[i],T[i ]            =O[i],O[i]=L [i]
#define Y _(0          ], 4] )_ (1 ], 5] )_ (2      ], 6] )_ (3 ], 7] )_=1
#define v(i)(      (( R[ i ] * _ + T [ i ]) * _ + O [ i ]) * _ + L [ i ]) *2
double b = 32  ,l ,k ,o ,B ,_ ; int Q , s , V , R [8 ], T[ 8] ,O [8 ], L[ 8] ;
#define q( Q,R ) R= *X ++ % 64 *8 ,R |= *X /8 &7 ,Q=*X++%8,Q=Q*64+*X++%64-256,
# define  p      "G\\QG\\P=GLPGTPGdMGdNGtOGlOG"   "dSGdRGDPGLPG\\LG\\LHtGHtH:"
#  define W         "Hs?H{?=HdGH|FI\\II\\GJlHJ"    "lFL\\DLTCMlAM\\@Ns}Nk|:8G"
# define   U           "EDGEDH=EtCElDH{~H|AJk}"       "Jk?LSzL[|M[wMcxNksNst:"
#  define u                  "Hs?H|@=HdFHtEI"             "\\HI\\FJLHJTD:8H"
char  *   x                   ,*X , ( * i )[               640],z[3]="4_",
*Z = "4,8O4.8O4G" r U "4M"u S"4R"u t"4S8CHdDH|E=HtAIDAIt@IlAJTCJDCIlKI\\K:8K"U
 "4TDdWDdW=D\\UD\\VF\\FFdHGtCGtEIDBIDDIlBIdDJT@JLC:8D"t"4UGDNG\\L=GDJGLKHL\
FHLGHtEHtE:"p"4ZFDTFLT=G|EGlHITBH|DIlDIdE:HtMH|M=JDBJLDKLAKDALDFKtFKdMK\
\\LJTOJ\\NJTMJTM:8M4aGtFGlG=G|HG|H:G\\IG\\J=G|IG|I:GdKGlL=G|JG|J:4b"W
S"4d"W t t"4g"r w"4iGlIGlK=G|JG|J:4kHl@Ht@=HdDHtCHdPH|P:HdDHdD=It\
BIlDJTEJDFIdNI\\N:8N"w"4lID@IL@=HlIH|FHlPH|NHt^H|^:H|MH|N=J\\D\
J\\GK\\OKTOKDXJtXItZI|YIlWI|V:8^4mHLGH\\G=HLVH\\V:4n" u t t
"4p"W"IT@I\\@=HdHHtGIDKILIJLGJLG:JK?JK?=JDGJLGI|MJDL:8M4\
rHt@H|@=HtDH|BJdLJTH:ITEI\\E=ILPILNNtCNlB:8N4t"W t"4u"
p"4zI[?Il@=HlHH|HIDLILIJDII|HKDAJ|A:JtCJtC=JdLJtJL\
THLdFNk|Nc|\
:8K"; main (
int C,char**        A) {for(x=A[1],i=calloc(strlen(x)+2,163840);
C-1;C<3?Q=_=       0,(z[1]=*x++)?((*x++==104?z[1]^=32:--x), X =
strstr(Z,z))      &&(X+=C++):(printf("P2 %d 320 4 ",V=b/2+32),
V*=2,s=Q=0,C     =4):C<4?Q-->0?i[(int)((l+=o)+b)][(int)(k+=B)
]=1:_?_-=.5/    256,o=(v(2)-(l=v(0)))/(Q=16),B=(v(3)-(k=v(1)
))/Q:*X>60?y   ,q(L[4],L[5])q(L[6],L[7])*X-61||(++X,y,y,y),
Y:*X>57?++X,  y,Y:*X >54?++X,b+=*X++%64*4:--C:printf("%d "
,i[Q][s]+i[Q ][s+1]+i[Q+1][s]+i[Q+1][s+1])&&(Q+=2)<V||(Q=
0,s+=2)<640
||(C=1));}

Y éste dicen que es laberíntico, pero a mí me parece muy claro:

#include <ncurses.h>/*****************************************************/
            int               m[256                   ] [         256   ],a
 ,b   ;;;   ;;;   WINDOW*w;   char*l=""   "\176qxl"   "q"   "q"   "k"   "w\
xm"   "x"   "t"         "j"         "v"         "u"         "n"         ,Q[
 ]=   "Z"   "pt!ftd`"   "qdc!`eu"   "dq!$c!nnwf"/**   ***   */"t\040\t";c(
int   u ,         int         v){                     v?m   [u]         [v-
 1]   |=2,m[u][v-1] &   48?W][v-1   ] &   15]]):0:0;u?m[u   -1][v]|=1   ,m[
 u-               1][   v]&         48?               W-1   ][v         ]&
15]   ]):0:0;v<   255   ?m[   u][v+1]|=8,m[u][v+1]&   48?   W][   v+1]&15]]
):0         :0;         u <               255   ?m[   u+1         ][v   ]|=
4,m[u+1][   v]&48?W+1][v]&15]]):0:0;W][   v]&   15]   ]);}cu(char*q){   return
 *q               ?cu   (q+         1)&         1?q   [0]               ++:
q[0   ]--   :1;   }d(   int   u ,   int/**/v,   int/**/x,   int   y){   int
Y=y   -v,   X=x         -u;   int         S,s   ;Y<         0?Y   =-Y   ,s,
s=-   1:(   s=1);X<0?X=-X,S   =-1  :(S=   1);   Y<<=   1;X<<=1;   if(X>Y){
int   f=Y               -(X   >>1   );;               while(u!=         x){
f>=   0?v+=s,f-=X:0;u   +=S   ;f+=   Y;m[u][v]|=32;mvwaddch(w,v   ,u,   m[u
 ][               v]&   64?   60:         46)         ;if         (m[   u][
v]&16){c(u,v);;   ;;;   ;;;   return;}}   }else{int   f=X   -(Y>>1);;   while
 (v   !=y         ){f   >=0         ?u   +=S,               f-=         Y:0
 ;v   +=s   ;f+=X;m[u][v]|=   32;mvwaddch(w,v   ,u,m[u][v]&64?60:46);if(m[u
 ][                     v]&         16)   {c(   u,v                     );
  ;   return;;;}}}}Z(   int/**/a,   int   b){   }e(   int/**/y,int/**/  x){
int               i ;         for         (i=         a;i               <=a
+S;i++)d(y,x,i,b),d(y,x,i,b+L);for(i=b;i<=b+L;i++)d(y,x,a,i),d(y,x,a+   S,i
 );                     ;;;         ;;;         ;;;               ;;;   ;
  mvwaddch(w,x,y,64);   ;;;   ;;;   ;;;   prefresh(   w,b,a,0,0   ,L-   1,S-1
);}             main(         int               V ,   char              *C[
  ]   ){FILE*f=   fopen(V==1?"arachnid.c"/**/   :C[   1],"r");int/**/x,y,c,
v=0         ;;;      initscr              ();               Z(Z         (raw
 ()   ,Z(   curs_set(0),Z(1   ,noecho()))),keypad(    stdscr,TRUE));w   =newpad
  (   300,  300               ) ;   for         (x=   255   ; x   >=0   ;x--
  )   for   (y=   255   ;y>=0;y--   )m[   x][   y]=   0;x=y=0;refresh( );while
  (   (c=                           fgetc (f)   )+1)                    {if(
0||c==10||  x==   256){x=0;y++;if(y==256  )break;;}   else{m[x][y]=(c   ==
'~'   ?64   : c   ==32              ?0:         16)   ;;x               ++;
      }}for(x=0   ;x<   256;x++)m   [x][0]=16   ,m[   x][   255]=16;for(y=0
;y<         256   ; y         ++)   m[0         ][y   ] =               16,
m[255][y]   =16   ;a=b=c=0;   x=y   =1;   do{v++;mvwaddch   (w,   y,x   ,m[
x][         y]&               32?   m[x                     ][y   ] &   16?
 0|   acs_map[l[m[x][y]&15]]:46 :   32);c==0163&&!(m[x][y+1]&16)?y++:   0;c
 ==   119         &&!         (m[                                       x][
 y-   1]&   16)   ?y--:0;;c   ==97  &&!(m[x-1][y]&16)?x--:0;c==100&&!(m[x+1
 ][   y]&   16)         ? x   ++:0              ;if(                    c==
 3-   1+1   ){endwin(   );;   return(0)   ;}x   -a<5?a>S-   5?a-=S-5:(a=0):
0;x               -a>         S-5?a<255   -S*         2?a               +=S
-5:(a=256-S):0;   y-b<5?b>L-5?b-=L-5:(b   =0)   :0;   y-b>L-5?b<255-L   *2?
b+=                                       L-5   :(b                     =256
-L)   :0;e(x,y);if(m[x][y]&64)break;}while((c=getch())!=-1);endwin();cu(Q);
printf(Q,v);}

En fin, todo muy sencillito, como este otro:

#include <stdlib.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#define t(x) typedef x
#define G return
#define Y(x) x;x
#define e(s) exit(s);
#define b(x,o) x o x
#define Z while
#define y fclose
#define end static

t(signed)char U;t(struct) b(O,);

t(                            U*)
H;                            t(O
*)                            *o;
struct O{ O* l, **h; void* L; } ; t(int)i; i P(U g) { G
isspace(g); } H D(H s){H p,r;if(!s)G 0;for(p=(H)s;*p &&
!P(*p); p++); if(r=malloc(p-s))for(p=r; *s&&! P(*s);p++
,s++)b(*,p=) s; G r;} void l(o p,O*x){*(o)x=* p; *p=x;}
#define m(x) do{ if(!(q = malloc(sizeof(O)))) e(1)q->l\
=0                            ;q\
->                            L=\
            x ; } while (0)
        i(*R)(i) =putchar;i h(
        o f,H d,U c){O*q; f+=c;Z(d&&*d)
      { m(D(d)); l(f++, q); Z(*d && !P(*d
    )) d++; Z(*d && P(*d)) d++; } G b(,0);}
     void k() { static U b(c,;) ?R(c):(c='\n'); }
     i main (i Q,             H *l){static o
   X;i t,j;                   switch (Q
 ){ case                       1: { H
 *p, I                         [] ={
"aH"                           " "
"B"                            "0"
" "                            "B"
""                            "B"
""                            " "
"B"                            ","
" "                           ","
 " `"                          "0 "
 "b0 "                         "@, "
  "0 Hb,"                      " B2 "
   "H0 b, B b"                "H HB b`, "
     "H, @ 2 `, "             "@2 H2 BH Bb"
      " b@","AH B0 BB B, , `0 b0 @, 0 Hb, B2 H0"
    " b, B bH HB b`, H, @ 2 `, @2 H2 BH Bb"
      " b@","0bHb, HbH `H2 @b, @H @0 B@ "
          "b@ bH0 bHB",".HHH","?`H0",
        ",b@b,"," +", 0}; p=I;

            if (!(X=calloc(
        6<<6,sizeof(O*))))e(1)
        do{h(X,(*p)+1,**p);} Z(*(++p));
      D: if ((t = getchar()) >= 0) { k();
    goto u;}e(0)}case 2:{U *p,e[33]; b(i, )
     ,w;for(i=0;i<34;i++)i[e]=b(0,;w=);p=e; Z(1){
    t = (w == 200) ?             10:getchar();
   switch(t) {                   case 0xa:
 case EOF:                       if(w--
 ){R(1[l                     ][0])
;for(i                           =0,
p=e;i                            <=w
;i+=                            6){
R (                            *p+
'+'                            );*
p++                            =0;
 ;}                            R(
 0xa                           );w
  =-1                         ;}p=
    e-                          1;case
      32:                    if (t<0) e(
    0)                    break; /*/*
      /*/                    default : *
        p
            |=(001<<(w%6));
        }if((++w%6)==0)p++;}e(
        0)}case 3:{O*u,*q,*x;U s[0400];
      i i;FILE*F; j:j=1;if(!(X=calloc(6<<
    6,sizeof(O*)))) e(1) if(!(F=fopen(j[l],
     "r")))e(1)Z(fgets(s,j<<8,F))(*s)&&h(X,s+j,*s
    );j=b(i,=)&0xff;             i:u=0;x=X[i];
   Z(x){q=Y(*(                   o)x)=Y(u)
 =Y(x)=q;}                       i[X]=u
 ;i=(i-2                     +9)%(
sizeof                           (s))
;if(i                            ^j)
goto                            i;;
y(F)                            ; }
case                            4:{
end                            i i
 ;if                            (!
 X){                           i=j
  =1;                         goto
    j;}                          if(i){O
      **x                    ,*m=*(x=X);
    do*                    x=1[x];Z(++
      x<X                    +255);*x=m;
        }        
            }default:if(!(t
        =*2[l]++))break;case 0
        :{H p;i i,c,n;O *a;u:c=n=0;Z(c<
      10){c++b(;,n:n++)}if(n<='&'){c-=(n%
    7);goto n;}else n++;a=*(X+t);Z(a){p=(H)
     a->L;Z(*p>=n){i=(*p++)-n;for(c=0;c<6;c++,i=i
     >>1){ if(b(!, i             &&)(*p >= n))
   break;R(32+                   (i&1)*3);
 }}R(10);a                       =a->l;
 }if(Q<2                     )goto
D;if(*                           l[2
]){R(                            10)
;main                            (4,
l);                            }}}
Z(Q                            ++<
1){                            X+=
 t;                            if
 ((t                           &7)
  >3)                         goto
    i;                          else {
      t--                    ;putchar(t)
    ;t                    =(t&7)?t:t-
      '*'                    ;}}exit(0);
        }

Y si queréis ver más, ya sabéis: código ofuscado


p.d.: En Basic (sea el que sea) esos códigos salen solos, ya es famoso el código espagueti de basic

[Neftali [Germán.Estévez]]

Empezado por Casimiro Notevi

Aquí adjunto algunos ejemplos de código claro, entendible y fácil de leer:

Le pasas un código de estos al formateador de código y lo "jubilas"

[HCammus]

El último código se entiende ^^

[ucanneo]

Empezado por Neftali

No te molestes si te digo que eso es una ¡¡soberana tontería!!
No dudo que recibas código no-entendibles, pero asociar eso a los códigos de C o Delphi me parece algo sin sentido.

Quien es ordenado lo es programando en cualquier lenguaje y quien es desordenado lo es también en cualquier lenguaje.
¡¡Qué tendrá que ver el tozino con la velocidad!!

Bueno si comes mucho tocino te pones gordo, puedes morir de un ataque al corazon y entonces si... tu velocidad es cero, aún estando gordo
Pero bueno no voy a discutir más relaciones velocidad-tocino que pudiese escribirse un libro, exagero quizá solo una pequeña tesis

_____________________________

Pero en fin, volviendo al hilo normal, creo que es bastante ceptable el defender mi punto de vista en base a la legibilidad de los códigos (Aclarando nuevamente que es muuuuuuuuuuuuy personal, que por lo visto creeen que hablo por todos y nuevamente recalco "es personal" y es una de mis argumentaciones, no todas), puesto que no es lo mismo trabajar solo que hacerlo con 5 o 6 personas más, en realidad es mas estresante, y empiezas a agradecer esas líneas solitarias, en fin que si hay relacion y mucha, algunas veces es increible ver como en pocas lineas de código VB hace lo que otros no logran ni en 5 o veces, pero eso es gracias a lo que el mismo lenguaje regala, entonces si hay herramientas disponibles ¡Hay que usarlas! y no porque una de ellas tenga menos valor o haga menos cosas hay que desmeritar sus virtudes es como si fuera Racismo de lenguaje de programación (jajajajaja).


Weno me ha dado mucho gusto el ver como se apasionan en este foro, eso es bueno, entiendo totalmente que delphi sea el consentido y no me molesta al contrario siempre es bueno estar abierto a alternativas, y todos enemos nuestro gallo (el mio es builder6 en programacion, 3dsMax en animacion, seguidos por VB, delphi, blitzBasic y Blender, pero todos tendremos siempre nuestra lista y es completamente comprensible que muchos tengan su primer lugar )


saludos y gracias por las respuestas (se nota que tengo tiempo libre XD)

[HCammus]

Si aquí todos son muy apasionados a Delphi, demasiado para ser sinceros, yo les mostrare un programa que estuve depurando en Delphi 4 hace ya 2 años y que me costo muchisimo asimilar las torpezas del que lo programo, solo para decirles que los comentarios que el código tenía solo daban risa en vez de orientación.

[[egostar]]

Empezado por ucanneo

......algunas veces es increible ver como en pocas lineas de código VB hace lo que otros no logran ni en 5 o veces, pero eso es gracias a lo que el mismo lenguaje regala.....

Hola ucanneo, me da gusto que defiendas tus ideas, es obvio que aquí somos delphi en un porcentaje mayoritario pero tambien te puedo decir que sabemos reconocer cuando se dan razones de peso.

Me pregunto si te interesaria hacer un ejercicio de ese código que mencionas y lo comparamos con lo que se puede hacer con delphi ?.

Salud OS

[Casimiro Notevi]

Empezado por egostar

[..] Me pregunto si te interesaria hacer un ejercicio de ese código que mencionas y lo comparamos con lo que se puede hacer con delphi ?.
Salud OS

Eso estaría muy bien, sería casi como un concurso o prueba.
En fin, es una pena que ya no tenga ese código... o sí?