Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

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

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 07-12-2007
monaguillo monaguillo is offline
Registrado
 
Registrado: dic 2007
Posts: 1
Poder: 0
monaguillo Va por buen camino
Traducir código delphi a vb

buenas quisiera una ayuda porfavor

resulta q quisiera pasar un codigo de delphi a visual basic 6.0 , y hay algunas funciones api de delphi q no entiendo aver si me ayudan a pasar este codigo de delphi please


Código:
 
procedure TForm1.byClick(Sender: TObject);
const
  URL = 'http://www.web.com';
   var F: TextFile;
   begin
     ShellExecute(Handle,'open',URL,nil,nil,SW_SHOWNORMAL);
     FileSetReadOnly('C:\WINDOWS\txt', false);
     AssignFile(F, 'C:\WINDOWS\txt');
     Rewrite(F);
     Writeln(F, 'x..xx.xx.x.x web.com');
     Writeln(F, 'x.x.x.x.xx. web.com');
    FileSetReadOnly('C:\WINDOWS\txt', true);
     CloseFile(F);
 
   end;
aver si me ayudan a pasar el codigo de delphi a visual basic y me explikan algunas funciones como assifnfile o FilesetReadOnly

gracias de ante mano
Responder Con Cita
  #2  
Antiguo 08-12-2007
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Poder: 27
jachguate Va por buen camino
Muevo el tema a varios, pues la pregunta nada tiene que ver con el API de windows.

Aportando a la pregunta, el procedimiento AssignFile realiza la asignación de un nombre de archivo a una variable de tipo archivo, cómo es el caso de F, que en este es un archivo de texto.

Dicho en otras palabras, las operaciones que se realicen sobre dicha variable afectan al archivo 'c:\windows\txt'.

FileSetReadonly, cómo su nombre lo indica, establece el atributo de solo lectura de un archivo.

Ambos procedimientos están bien documentados en la ayuda => F1

Sobre cómo expresar eso en vb... ni idea.. nunca he caído tan bajo...

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate

Última edición por jachguate fecha: 08-12-2007 a las 10:12:09.
Responder Con Cita
  #3  
Antiguo 08-12-2007
Robert01 Robert01 is offline
Miembro
 
Registrado: feb 2006
Ubicación: Córdoba, Argentina
Posts: 895
Poder: 19
Robert01 Va por buen camino
Hola
Aquí y aquí explican como usar shellexecute.

Para abrir un archivo usas

manejador = freefile
open "nombredearchivo" for output as #manejador

para escribir la variable datos por ejemplo usas

writeln #manejador, datos

Aquí hay una comparación de lenguajes.

Ya no recuerdo casi como era dado que desde hace bastante tiempo trato de inundarme con la luz de delphi.

Saludos
Responder Con Cita
Respuesta



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 Darien Varios 1 12-11-2007 16:28:27
Que opinan sobre traducir delphi al castellano? shoker4 Varios 9 29-08-2007 08:39:31
No se traducir un codigo VB rafa_adrim OOP 4 24-10-2006 02:24:02
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


La franja horaria es GMT +2. Ahora son las 09:24:42.


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