Club Delphi  
    Paypal   FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > OOP
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Coloboración Paypal con ClubDelphi

 
 
Herramientas Buscar en Tema Desplegado
  #8  
Antiguo 19-08-2006
Avatar de Ñuño Martínez
Ñuño Martínez Ñuño Martínez is offline
Moderador
 
Registrado: jul 2006
Ubicación: Ciudad Catedral, Españistán
Posts: 6.025
Poder: 27
Ñuño Martínez Tiene un aura espectacularÑuño Martínez Tiene un aura espectacular
Lo olvidaba: hace unos años escribí la especificación de un lenguaje que llamé PROCAS (PROgramación en CAStellano). No era, símplemente, traducir las palabras clave de otro lenguaje (como Pascal) sino diseñar normas más acordes con la estructura del idioma castellano. Estaba orientado a objeto (mucho más que Delphi e incluso que Java... un poco al estilo de SmallTalk) y podías escribir cosas como esta:

Código:
PARA BuscaLibro DONDE NombreAutor ES CADENA, Librería ES CONTENEDOR:
  POR CADA Libro DE Librería,
    SI EL Autor DEL Libro ES NombreAutor, ENTONCES DEVUELVE Libro.
  REPITE.
FIN DE BuscaLibro.
Lo que en Objetive Pascal sería (más o menos):
Código Delphi [-]
FUNCTION BuscaLibro (NombreAutor: STRING; Libreria: TLIBRERIA): TLIBRO;
VAR
  Libro := TLIBRO;
BEGIN  
  RESULT := NIL;
  Libro := Librería.PrimerElemento;
  REPEAT
    IF Libro.Autor := NombreAutor THEN
    BEGIN
      RESULT := Libro;
      EXIT;
    END;
    Libro := Libro.Siguiente;
   UNTIL Libro = NIL;
END;

Si funcionara sería impresionante, ¿no creen? Tal vez la recupere cuando empiece a escribir compiladores para la máquina virtual que he diseñado .
Responder Con Cita
 



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Traducir excepciones JulioGO Firebird e Interbase 1 15-02-2005 17:47:32
Traducir un codigo de VB a Delphi ¡¡¡¡ Por favor !!!! Betsa23 Internet 2 30-11-2004 16:29:35
Ayuda en traducir de C a Delphi carlosmoralesm C++ Builder 2 01-07-2004 09:28:59
Traducir texto a voz Jose Manuel API de Windows 1 27-04-2004 22:37:28
Traducir aplicación Sick boy Varios 4 29-09-2003 13:09:22


La franja horaria es GMT +2. Ahora son las 18:20:12.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi