• Jueves 28 de Marzo de 2024, 15:03

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Saiyan1

Páginas: [1] 2 3
1
Delphi / Re: Sintaxis Sql Update En Delphi
« en: Jueves 21 de Junio de 2007, 13:12 »
y bueno lencho.. :angry:

es que estaba apurado en ese momento, y no quiero dejar el hilo colgado y piensen que nunca lo leí.

En realidad después de un tiempo de haber dejado ese mensaje encontré el

Código: Text
  1. Quotedstr(cadena)
  2.  

que satisfizo mis necesidades.

De todas maneras me sirvió lo que el amigo me respondió para el apuro.

Gracias otra vez.

Saludos! :lol:

2
Delphi / Re: Sintaxis Sql Update En Delphi
« en: Miércoles 20 de Junio de 2007, 13:13 »
muchas gracias.

3
Delphi / Sintaxis Sql Update En Delphi
« en: Martes 24 de Abril de 2007, 18:02 »
estoy teniendo problemas con la sintaxis de update...

ejemplo:

tengo en edit1 lo q quiero modficar (updatear)

Código: Text
  1.  
  2. adoquery1.sql.add('UPDATE tabla (columna1) SET(columna1) VALUES ([B]'edit1.text[/B]') WHERE Id=1')
  3.  

o quizas sea...

Código: Text
  1. UPDATE tabla SET columna1=edit1.text WHERE ....
  2.  

pero aparte de esto, el problema q tengo es como hago para tomar el text de un edit para una consulta SQL en los 2 casos

* si es texto
* si es numero

supongo q cuando es numero se hace
Código: Text
  1. inttostr(edit1.text);
  2.  

pero cuando tengo tomar para Delphi y es texto uso

Código: Text
  1. 'Mostrar lo q tiene el edit1 '+ edit1.text +' pesos.
  2.  

pero en SQL se me complica por los apostrofes...

como inserto el contenido del edit dentro de una consulta sql, por ejemplo UPDATE??


espero respuesta

4
Pascal / Re: Suprimir Vocales Repetidas De Una Cadena
« en: Miércoles 17 de Enero de 2007, 11:39 »
Como empezarias el ejercicio?

5
Pascal / Re: Porke No Me Compila?
« en: Lunes 8 de Enero de 2007, 15:43 »
Código: Text
  1. else
  2. writeln ('error');
  3. end;
  4. readln
  5. until opcio = 0
  6. readln;
  7. end.
  8.  

en esta ultima parte de tu codigo

no lei nada del codigo.. me fie en lo que describiste del error que comentas...

te falta punto y coma despues del readln
y otro punto y coma despues de until opcio = 0

o sea que te quedaría

Código: Text
  1. readln;
  2. until opcio = 0;
  3. readln;
  4. end.
  5.  


Saludos

6
Pascal / Re: Invalid File Handle
« en: Martes 26 de Diciembre de 2006, 19:12 »
pone mas codigo... mostra las lineas donde lo intentas abrir y cerrar..

 porque con eso no se me ocurre nada...

tampoco te garantizo solucionartelo.. pero con mas lineas.. se pueden ver mas cosas.

7
Pascal / Re: Preguntar Nombre Para Crear Un Archivo
« en: Martes 26 de Diciembre de 2006, 19:09 »
me parece muy buena la actitud.

si.. despues tambien fijate la funcion "GETDIR"... que se la puede usar para esto o el renombre de archivos...

nos vemos che, saludos!

8
Pascal / Re: Preguntar Nombre Para Crear Un Archivo
« en: Martes 26 de Diciembre de 2006, 12:15 »
Código: Text
  1. archivo: text;
  2. nombre: string;
  3.  
  4. Begin
  5. Write('Dame nombre: ');
  6. Readln(nombre);
  7.  
  8. nombre:='C:\' + nombre +'.txt');
  9.  
  10. assign(archivo,nombre);
  11.  
  12. Rewrite(archivo); {y comproba todo con los IOResult}
  13. close(archivo);
  14.  

fijate si te soluciona lo que pedis..

9
Pascal / Re: ¿como Realizar Operaciones Con Numeros Grandes?
« en: Jueves 23 de Noviembre de 2006, 23:59 »
http://es.wikipedia.org/wiki/BCD


ahi lo tenes en español.. ;)

10
Pascal / Re: Como Se Hace Un .exe Con Pascalin?
« en: Jueves 23 de Noviembre de 2006, 23:23 »
Citar
que en tu PC esté donde dices no significa que en el resto estará en el mismo lugar

y si...

yo "SUPONGO" que si alguien está en este foro es porque quiere aprender a programar... y si querés aprender a programar... yo SUPONGO que al menos sabés instalar un programa... y SUPONGO que me entiende cuando lo explico de esa manera...

.... o no? :alien:

Saludos

11
Pascal / Re: ¿como Realizar Operaciones Con Numeros Grandes?
« en: Martes 14 de Noviembre de 2006, 16:25 »
los numeros mas grandes que puedes usar en Pascal son Longint
presiona shift+F1 y teclea longint... y ahi te fijas las cifras

saludos

en PASCAL...

12
Pascal / Re: Ayuda Para Un Principiante (tp 7.0)
« en: Viernes 10 de Noviembre de 2006, 15:01 »
CHAN!

... no me salen tan sutiles como a vos Enko.. :P

13
Pascal / Re: Ayuda Para Un Principiante (tp 7.0)
« en: Viernes 10 de Noviembre de 2006, 14:41 »
Citar
1) No entiendo por q me tira este error

CODE
pas: tlista of regPas;


cuando introdusco cualquier linea de este caracter, pascal me tira error... algo como Error 85: ";" missing...

1) Antes de postear, tendrías que haber leido que no se hacen tareas por estos foros...
2) Generalmente no contesto con esta mala predisposición, pero explico porque lo hago asi en esta oportunidad.


A mi entender no tenes ni idea de programar en PASCAL, o al menos de ese programa que estás mostrando, porque ni siquiera entendes el mensaje de error más simple que tiene TURBO PASCAL 7.0 que es el número 85, que simplemente es que te falta ingresar un ";".

Antes de postear acordate de leer las reglas, pero por sobre todo 2 cosas simples:
* no tareas
* preguntar algo específico que no sepas...

Todo bien loco, la gente de acá ayuda muchísimo, y a mi me jode que molestes con cosas que ni siquiera sabes que son...

Por ahi estoy equivocado... y si estoy equivocado y me lo probás.. pido las disculpas correspondientes... pero me parece que no.


Saludos

14
Pascal / Re: Compiladores Para Pascal
« en: Lunes 6 de Noviembre de 2006, 14:13 »
También existe

"Turbo Pascal for Windows"( no se por cual version anda)

que prácticamente es lo mismo que Turbo Pascal 7.0, con la diferencia que (como lo dice su nombre) escribes en una ventana de tipo "Windows"(corre bajo Windows), y tiene coloreado de sintaxis como TP 7.0 y demás...


Saludos

15
Pascal / Re: Reconocimiento De Frase, Char
« en: Lunes 6 de Noviembre de 2006, 14:07 »
Citar
entre las reglas de este foro esta la de no realizar tareas a los demás, tienes que tener una duda en especifico,

Eso es cierto amigo... o al menos.. si tienes tarea.. formula la pregunta de manera que no nos demos cuenta de que es una tarea que te dieron... jaja.. asi no nos damos cuenta :P


De todas maneras te brindo otra opcion ademas de la que te dieron anteriormente

Podrías hacerlo con un Case que "tome" "Chars" (caracteres)

Sería algo como

Código: Text
  1. var
  2. Opcion:char
  3.  
  4. Begin
  5. ClrSCr;
  6. Writeln('Ingrese Opción: ');
  7. Writeln('(a) Galones ');
  8. Writeln('(b) Litros ');
  9. Writeln('(...) ...todos los que quieras.. ');
  10. Readln(opcion);
  11. Case Opcion of
  12. 'a': ...Formula para calcular Galones...
  13. 'b': ...Formula para calcular Litros...
  14. '...':...etc etc
  15. else
  16. Writeln('Error en ingreso de Opcion');
  17.  
  18.  
  19.  


Cualquier cosa, escribi nimas

16
Pascal / Re: Mi Juego
« en: Martes 31 de Octubre de 2006, 14:49 »
lo vi un toke nomas, pero esta bueno.

como hiciste el asunto de los Tiles??
... porque ando queriendo hacer uno con tiles..

Enko me paso la libreria UGO y todavia no la pude ver... la hiciste con esa??

17
Pascal / Re: Como Se Hace Un .exe Con Pascalin?
« en: Martes 31 de Octubre de 2006, 12:50 »
No se si hay otra forma, pero si lees más arriba en este thread, me explicaron como hacerlo.

En vez de abrir el Turbo Pascal (Programas/Turbo Pascal 7.0/Turbo Pascal 7.0)
Abri el TPX (Programas/Turbo Pascal 7.0/TPX)

y hacelo con ese... (el alt+F9 digo..) ..la "compilación"


cualquier cosa, escribi nomás.

Saludos

18
Pascal / Re: Conseguir Pascal
« en: Lunes 23 de Octubre de 2006, 00:23 »
Para ponerlo FullScreen.. presiona ALT+ENTER.. nada mas :)

Saludos

19
Pascal / Re: Ayuda Plis!
« en: Domingo 15 de Octubre de 2006, 17:09 »
Una pregunta Enko...
para que sea posible el poner

Código: Text
  1. until OptionMenu ='salir';
  2.  

como haces?

creando una lista enumerada?
ej:

Código: Text
  1. OptionMenu = (Shakira, Sanz, Arjona, Salir);
  2.  

??

20
Pascal / Re: Tomar Datos De Un Archivo
« en: Martes 26 de Septiembre de 2006, 12:14 »
Ah OK, muchas gracias, lo pruebo y te digo.

Saludos!

21
Pascal / Tomar Datos De Un Archivo
« en: Martes 26 de Septiembre de 2006, 02:51 »
Como van?

en este caso para el ahorcado... como puedo hacer para que un programa (pascal) tome al azar palabras de un archivo (ej: un .txt)? Se que se puede.. pero no se como...  :alien:

Gracias desde ya...!

O como se llama el procedimiento asi busco..  ;)


Saludoss

22
Pascal / Re: La Vida Por Un Barco
« en: Viernes 22 de Septiembre de 2006, 20:03 »
Citar
Debe ser por el tamaño de la ejecutable.

pesa 5 kb ... no creo que sea el tamaño... je.

Citar
Ingreso, 1A, o 5B y se cierra.

es que te pide columna y despues fila ... y como acepta solo integers... cuando pones una letra sale... es la forma de dejar de jugar... juaja

ya habia dejado el codigo.. pero me parece que se traspapeló en http://foros.solocodigo.com/index.php?showtopic=22386

por las dudas, lo dejo acá:
(y no es mio el juego, lo tome del chabon ese que empezo preguntandote y despues se fue p*teando... ja!)

PD: hoy le cambiaría algunas cosas al juego, porque cuando lo hice todavía no me enseñaban procedimientos y funciones.. aprendi tocando nomas..  :lol:  ahora ya aprendí :P

aca va el codigo!

-----------------------
Código: Text
  1. {**********************************************************************}
  2. {*                     La Vida por un Barco                  02/06/06 *}
  3. {*    Gracias:                                                        *}
  4. {*            a foros.solocodigo.com                                  *}
  5. {*            a Enko (moderador del foro Pascal), por las ayudas.     *}
  6. {*            a mi Amor Estela, por hacerme el aguante.               *}
  7. {*                                                                    *}
  8. {*                        Dise¤ado por:                               *}
  9. {*                     Gustavo Insaurralde                            *}
  10. {*                    tavo.guanako@gmail.com                          *}
  11. {*                      www.anaprog.com.ar                            *}
  12. {**********************************************************************}
  13.  
  14. Program lifeXship;
  15. uses crt;
  16. const
  17.  m=10;
  18.  NADA = 0;
  19.  TIBURON = 1;
  20.  BARCO = 2;
  21.  
  22. var
  23.  
  24. Mar: array[1..m,1..m] of integer;
  25. CasillasDescubiertas: array[1..m,1..m] of Boolean;
  26. vic,i,j: Integer;
  27. op:string;
  28.  
  29. procedure Init;
  30. var
  31. i,j,p,q: integer;
  32. begin
  33.  for i:=1 to m do
  34.     for J:=1 to m do
  35.         Mar[i,j] := NADA;
  36.   for i:=1 to m do
  37.   Mar[i,1] := TIBURON;
  38.     for  i:=1 to 10 do
  39.     Mar[i,2] := BARCO;
  40. end;
  41.  
  42. {Intercambia dos variables}
  43. procedure Intercambiar(var A,B: Integer);
  44. var
  45. C: Integer;
  46. begin
  47.  C := A;
  48.  A := B;
  49.  B := C;
  50. end;
  51.  
  52. {esto mezcla los campos y los desordena, de manera que uno se asegura que
  53. hay 10 tiburones y 10 barcos}
  54. procedure Mezclar;
  55. var
  56.  i,j, nI, nJ: integer;
  57. begin
  58. Randomize;
  59.   for i:=1 to m do
  60.     for J:=1 to m do
  61.     begin
  62.        nI := RAndom(10)+1;
  63.        nJ := RAndom(10)+1;
  64.        Intercambiar(Mar[i,j], Mar[nI,nJ]);
  65.     end;
  66. end;
  67.  
  68. procedure limpiar;                {limpiar la jugada escrita}
  69. begin
  70. readkey;
  71. gotoxy(10,14);
  72. clreol;
  73. end;
  74.  
  75. procedure ImprimirMar;            {graficar la matriz de * y ponerle true}
  76. var
  77.  i,j: Integer;
  78.  begin
  79.  gotoxy(20,2);
  80. for i:=1 to m do
  81. begin
  82.    for j:=1 to m do
  83.    begin
  84.    CasillasDescubiertas[i,j]:=true;
  85.    Write(' *':3);
  86.    end;
  87.       writeln;
  88.       gotoxy(20,2+i);
  89. end;
  90. end;
  91.  
  92. procedure limpiartodo;      {cuando termina el juego}
  93. var i:integer;
  94. begin
  95. for i:=20 downto 1 do
  96. begin
  97. gotoxy(1,i);
  98. clreol;
  99. end;
  100. end;
  101.  
  102. procedure mover;
  103. var
  104. i,j,bar,tib,c: integer;
  105. g:char;
  106. Begin
  107.  tib:=0;
  108.  bar:=0;
  109.  While (tib<3) and (bar<3) do
  110.  Begin
  111.     Gotoxy(14,14);
  112.   write('Digite el numero de columna en que desee moverse: ');
  113.     readln(i);
  114.      Gotoxy(1,14);
  115.    clreol;
  116.      gotoxy(14,14);
  117.    clreol;
  118.   write('Digite el numero de fila en que desee moverse: ');
  119.   read(j);
  120.      Gotoxy(1,14);
  121.      clreol;
  122.  
  123.   if (CasillasDescubiertas[i,j]=true) then
  124.    begin
  125.                gotoxy(29,15);
  126.     case Mar[i,j] of
  127.     0:begin
  128.       Writeln('Estas en el Agua');
  129.       CasillasDescubiertas[i,j]:=false;
  130.       limpiar;
  131.       end;
  132.     1: begin
  133.        Writeln('Hallaste un Barco!');
  134.        bar:=bar+1;
  135.        CasillasDescubiertas[i,j]:=false;
  136.        limpiar;
  137.        Gotoxy(63,2);
  138.        write(bar);
  139.        end;
  140.     2:  begin
  141.         Writeln('Te ha mordido un Tiburon');
  142.         tib:=tib+1;
  143.         CasillasDescubiertas[i,j]:=false;
  144.         limpiar;
  145.         gotoxy(72,2);
  146.         write(tib);
  147.         end;
  148.     end;
  149.    end
  150.   else
  151.    begin
  152.    textcolor(lightgreen+blink);
  153.    gotoxy(15,16);
  154.    Writeln('Esa jugada ya fue realizada (Columna:',i,'-Fila:',j,')');
  155.    readkey;
  156.    gotoxy(12,16);
  157.    clreol;
  158.    normvideo;
  159.    end;
  160.  
  161. begin                               {grafica la jugada "procedure pq no?"}
  162. gotoxy(21,2);
  163. gotoxy(19+i*2+i,1+j);
  164. case Mar[i,j] of
  165. 0:begin
  166.   g:='A';
  167.   textcolor(lightblue);
  168.   write(g);
  169.   normvideo;
  170.   end;
  171. 1:begin
  172.   g:='B';
  173.   textcolor(brown);
  174.   write(g);
  175.   normvideo;
  176.   sound(300);
  177.   delay(200);
  178.   sound(400);
  179.   delay(200);
  180.   nosound;
  181.   end;
  182. 2:begin
  183.   g:='T';
  184.   textcolor(lightred);
  185.   write(g);
  186.   normvideo;
  187.   sound(90);
  188.   delay(300);
  189.   sound(85);
  190.   delay(300);
  191.   nosound;
  192.   end;
  193.  
  194. end;
  195. gotoxy(1,14);
  196. end;
  197.  
  198. gotoxy(1,30);
  199.       for c:=30 downto 13 do
  200.       begin
  201.       clreol;
  202.       gotoxy(1,c);
  203.       clreol;
  204.       end;
  205.  
  206.  end;
  207.   limpiartodo;
  208.   gotoxy(30,13);
  209.   Writeln('Fin del Juego!');
  210.   if tib=3 then
  211.     begin
  212.     gotoxy(20,14);
  213.     textcolor(lightred);
  214.     Write('Perdiste. Te han mordido 3 Tiburones.');
  215.     vic:=1;
  216.     end
  217.   else
  218.   begin
  219.   gotoxy(20,14);
  220.   textcolor(red+blink);
  221.   Writeln('Ganaste!! Has encontrado los 3 Botes!!!');
  222.   end;
  223.   normvideo;
  224.   gotoxy(65,18);
  225.   textcolor(lightblue);
  226.   Write('Isoft¸');
  227.   normvideo;
  228.   textcolor(lightgreen);
  229.   gotoxy(59,19);
  230.   Write('Powered by Unicyber.');
  231.   normvideo;
  232. end;
  233.  
  234. Procedure sonido;
  235. Begin
  236.   for i:=1 to 1 do
  237.   begin
  238.   for j:=1 to 3 do
  239.   begin
  240.   sound(200);
  241.   Delay(200);
  242.   sound(200);
  243.   delay(200);
  244.   NoSound;
  245.   end;
  246.   sound(300);delay(200);sound(250);delay(180);sound(200);delay(500);
  247.   nosound;
  248.   end;
  249. end;
  250.  
  251.  
  252.   Procedure Sonidoper;
  253.   begin
  254.   for i:=1 to 2 do
  255.   begin
  256.   sound(500);
  257.   delay(150);
  258.   sound(280);
  259.   delay(150);
  260.   nosound;
  261.   sound(150);
  262.   delay(500);
  263.   nosound;
  264.   end;
  265.   end;
  266.  
  267.   Procedure sonidogan;
  268.   begin
  269.   for i:=1 to 2 do
  270.   begin
  271.   sound(600);
  272.   delay(150);
  273.   sound(480);
  274.   delay(150);
  275.   nosound;
  276.   end;
  277.   sound(600);
  278.   delay(500);
  279.   nosound;
  280.   end;
  281.  
  282.   Procedure Puntos;
  283.   Begin
  284.   for i:=1 to 3 do
  285.   begin
  286.   gotoxy(59,0+i);
  287.   Write('³');
  288.   gotoxy(77,4-i);
  289.   Write('³');
  290.     gotoxy(67,4-i);
  291.   Write('');
  292.   end;
  293.    for i:=1 to 17 do
  294.    begin
  295.    gotoxy(59+i,3);
  296.    write('_');
  297.    end;
  298.    gotoxy(61,1);
  299. textcolor(brown);
  300. Write('Botes');
  301. normvideo;
  302. gotoxy(68,1);
  303. textcolor(red);
  304. Write('Tiburones');
  305. normvideo;
  306. gotoxy(72,2);
  307. Write('0');
  308. gotoxy(63,2);
  309. Write('0');
  310.    end;
  311.  
  312.    Procedure intro;
  313.   Begin   {presentacion}
  314. clrscr;
  315. gotoxy(32,10);
  316. textcolor(lightblue);
  317. Writeln('Isoft Games ¸');
  318. normvideo;
  319. gotoxy(34,11);
  320. Writeln('presenta');
  321. delay(2000);
  322. gotoxy(34,11);
  323. clreol;
  324. gotoxy(28,10);
  325. clreol;
  326. textcolor(lightred);
  327. Write('La Vida Por un Barco!!!');
  328. normvideo;
  329. delay(2500);
  330. gotoxy(1,10);
  331. clreol;
  332. Writeln('Un buen d¡a se te ocurre ir de vacaciones a Miami.');
  333. Writeln('Y cuando llegas, tienes ganas de ir al a nadar al mar.');
  334. Writeln('Te vas a nadar al mar... muy relajado...');
  335. Writeln('Cuando de repente... estas rodeado de tiburones!!!');
  336. Writeln(' ');
  337. Writeln('Debes encontrar 3 barcos!');
  338. Writeln('Si te muerden 3 tiburones... pierdes.');
  339. Writeln('Suerte!');
  340. Writeln(' ');
  341. Writeln(' ');
  342. Write('Presiona una tecla para continuar...');
  343. readkey;
  344. for i:=100 downto 1 do
  345. begin
  346. gotoxy(1,i);
  347. clreol;
  348. end;
  349. end;
  350.  
  351.  Procedure Refer;       {Imprime referencia de filas y Columnas}
  352.  begin
  353.  gotoxy(20,1);
  354.  textcolor(green);
  355.  for i:=1 to m do
  356.  begin
  357.  Write(' ',i:2);
  358.  end;
  359.  normvideo;
  360.  gotoxy(18,2);
  361.  textcolor(magenta);
  362.  for i:=1 to m do
  363.  begin
  364.  Writeln(i);
  365.  gotoxy(18,2+i);
  366.  end;
  367.  normvideo;
  368.  end;
  369.  
  370.  Procedure descubrir;
  371.  var g:char;
  372.  begin
  373.  gotoxy(21,2);
  374.  for i:=1 to m do
  375.   for j:=1 to m do
  376.   begin
  377. gotoxy(19+i*2+i,j+1);
  378. case Mar[i,j] of
  379. 0:
  380.    begin
  381.    g:='A';
  382.    if CasillasDescubiertas[i,j]=true then           {grafica en amarillo si/}
  383.    textcolor(yellow)                                 {fue jugada la posicion}
  384.    else
  385.    textcolor(lightblue);
  386.    Write(g);
  387.    end;
  388. 1:
  389.    begin
  390.    g:='T';
  391.    if CasillasDescubiertas[i,j]=true then           {idem anterior}
  392.    textcolor(yellow)
  393.    else
  394.    textcolor(lightred);
  395.    Write(g);
  396.    end;
  397. 2:
  398.    begin
  399.    g:='B';
  400.    if CasillasDescubiertas[i,j]=true then           {idem anterior}
  401.    textcolor(yellow)
  402.    else
  403.    textcolor(brown);
  404.    Write(g);
  405.    end;
  406. end;
  407.   normvideo;
  408.   end;
  409.   end;
  410.  
  411.  
  412. Begin  {START}
  413.   ClrScr;
  414.   intro;
  415.   Init;
  416.   Mezclar;
  417.   Refer;
  418.   imprimirmar;
  419.   puntos;
  420.   mover;
  421.   descubrir;
  422.   if vic=1 then
  423.   sonidoper
  424.   else
  425.   sonidogan;
  426.   Readkey;
  427. end.
  428.  
  429. ----------------------
  430.  
  431.  

23
Pascal / La Vida Por Un Barco
« en: Miércoles 20 de Septiembre de 2006, 14:58 »
Aqui les va...

lo prueban y me dicen !!!


Agradecimientos

* Enko : por guiarme en todo el proyecto
* Hassansito: por testearlo
* Jose: por habilitarme el ciber para terminarlo.


Quiero opiniones!


Saludos

Para descargarlo: http://rapidshare.de/files/33789640/LIFE.EXE.html


PD: ayer pude levantar un .exe aqui en el foro.. y hoy me dice que no se puede (???)

24
Pascal / Re: Un Ahorcado!!
« en: Miércoles 20 de Septiembre de 2006, 14:41 »
Pienso lo mismo con respecto a las letras.

Lo unico que hice yo fue el dibujo de la horca con el muñequito y sus "cambios" (ir dibujandolo con los errores).

Nos dividimos los bloques y yo hice eso.

Le voy a decir que me pase el fuente y lo posteo...

Saludos!!

Que me decis del Life.exe que deje en el otro post?

ese si lo hice todo yo.

te fijaste?

o alguien mas se fijó?


PD: por mi parte estoy haciendo un blackjack ... que no tengo tiempo libre para terminarlo nomas... pero me falta muy poco.

Todo con crt nomas eh!!  :lol:

25
Pascal / Re: Como Se Hace Un .exe Con Pascalin?
« en: Miércoles 20 de Septiembre de 2006, 02:20 »
siii señor!!

con el tpx lo hace!!!

Gracias a todosss!!!

hago un post nuevo para adjuntarlo!

Saludosss!

Páginas: [1] 2 3