.
Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.
Mostrar Mensajes MenúCita de: ░▒▓BlackZeroҖ▓▒░ en 5 Agosto 2008, 07:33 AM
PD.: Se ve bien a color no jaja,
Citarc:\> programa.exe HOLA
Private Sub Form_Load()
If Command$ <> "" Then
MsgBox Command$
Else
MsgBox "command$ vacio xD"
End If
End Sub
'obtenemos los datos y los guardamos en una variable
Winsock1.GetData Buffer
Text1.Text = Buffer 'mostramos los datos
uses strings,crt;
const cadena : PChar= 'casa';
begin
clrscr;
Writeln ('La cadena tiene: ',StrLen(cadena),' caracteres');
readln;
end.