SoloCodigo

Holas, estoy usando una funcion para hacer un firewall...
La que realmente importa ahora es la funcion GetTcpTable, es una funcion externa, en una dll llamada "iphlpapi.dll".
El problema que tengo es en la pasada de parametros (la funcion devuelve un codigo de error que es 0 si es correcto, y cualquier otro valor si hay un error, el valor indica el error, un codigo de error comun y corriente).
*******Ahora les voy a mostrar los tipos de dato requeridos para la funcion
type
  MIB_TCPROW = record
    dwState: dword;
    dwLocalAddr: dword;
    dwLocalPort: dword;
    dwRemoteAddr: dword;
    dwRemotePort: dword;
  End;
  MIB_TCPTABLE = record
    dwNumEntries: dword;
    table: array[0..100] of MIB_TCPROW;
  End;

***********Ahora dos tipos de puntero********************

  pDW = ^dword;
  pTabla = ^MIB_TCPTABLE;

***Ahora, dos variables declaradas en la seccion Private del form****

private
   tabla: MIB_TCPTABLE;
   conexion: MIB_TCPROW;

*************Ahora, en la seccion Implementation****************
//Externa
function GetTcpTable(table:pTabla;pdwSize:pDW;bOrder: boolean):DWORD; External 'iphlpapi.dll';
//Form.Create
procedure TForm1.FormCreate(Sender: TObject);
var
  retval: DWORD;
  bucle:integer;
  x: Boolean;
  tamanio: DWORD;
begin
  show;
  tamanio:=sizeof(tabla);
  x:=false;
  retval:=GetTcpTable(@tabla,@tamanio,x);
  //lo que sigue no viene al caso**************************************
End;

Vean este codigo, no entiendo xq me da error 87 (parametro/parametros no valido/validos)

Holas alguno me puede dar la funcion que me permita personalizar un datagrama IP???? pliiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiiis.

(Yo me imagino que componentes como el winsock deben usar unas así)

Quisiera saber si al menos uno tiene una idea del nombre... lo necesito

Grax Blacktigerx, la verdad grax por todas las veces que me ayudaste, amiluis tb grax, y una cosa para vos amilius, acabo de crear un programa que guarda archivos ascii que son macros y los ejecuta, entonces creas vos tus pripias lineas para macrear. para que entiendas mejor te paso un zip, bajatelo, creo que te va a gustar.

Si vas a hacer una cosa grosa y compleja, es mejor el delphi, esta groso, me compre la biblia yo (de delphi) y es muy buena, pero si vas a hacer algo corto (como un juego de matar a pikachu, o el de las clasicas vivoritas que comen puntitos y se hacen mas grandes, o un ping pong como el primer juego del mundo) es conveniente el Visual Basic.

Por ejemplo, un programa de compresion no se puede hacer en VB, al menos no uno bueno, para eso es mejor delphi (u otro lenguaje...) . pero si se quiere hacer un juego como el que mando de adjunto, es mejor el VB. el juego que les mando lo hice yo.

Para los que quieran jugar el de la vivorita, aca va de adjunto. El juego empieza pausado, para aprender a jugar vean la ayuda.

no importa, ya lo arreglé, quizas el problema es porque al ser un trial no lo permite. Lo que quería es que, cuando uno hace un icono en paint le cambia la extension y ese icono lo usa para... cambiar en el icono de mi pc.. etc.
pero los programas para programar creo que no permiten iconos hechos en paint.
ya lo solucioné bajando un editor de iconos (pero mandame uno mejor porque el mio es solo de 16 colores).

mi evento keydown, tiene el procedure asociado:

procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);
begin
    edit1.Text := inttostr(key);
    If Key = 40 Then //abajo
        if shape3.top <= 149 then shape3.top := shape3.Top + 6;
    If Key = 38 Then //arriba
        if shape3.Top >= 3 then shape3.Top := shape3.Top - 6;
    If Key = 65 Then //A
        if shape2.Top >= 3 then shape2.Top := shape2.Top - 6;
    If Key = 90 Then //Z
        if shape2.Top <= 149 then shape2.Top := shape2.Top + 6;
    if key = 113 then//F2
    begin
        timer1.Enabled := not timer1.enabled
    end;
end;

el programa hace 5 comprobaciones, el programa es el antiguo PONG (el de los palitos y la pelota).

si se presiona A o Z, el programa moverá la shape2 arriba o abajo respectivamente. (jugador 1)

si se presiona la flecha arriba o la flecha abajo, en esas direcciones irá el jugador 2.

ahora el problema: cuando presiono una tecla y la mantengo presionada, el eventi se mantiene, y el cosito se mueve hasta que se deje de presionar la tecla, pero si mantengo la primera tecla, y a la vez mantengo presionada una segunda tecla, entonces lo que pasará es que se dejará de mover el primer coso en la primer direccion en que se estaba moviendo, para empezar a moverse el segundo (o el primer coso en una nueva direccion, depende de las teclas que se presionan).

Lo que quiero hacer es que se reconozcan ambas teclas a la ves, asi los jugadores se mueven con libertad ( en el rango reglamentario del ping pong: arriba o abajo)

no puedo poner un icono hecho en paint. xq?
si definitivamente no se puede.. como lo puedo hacer?

ahora, una preguntita... cuando me dijiste lo de ord('u') ... se que teclas como el alt tienen una constante, por lo que vi en otro post, la constante del alt es VK_MENU, ¿¿¿¿¿me sabrias decir las constantes de las teclas tipo CTRL, SHIFT, CAPS LOCK, ENTER, ESC, F1 a F12, SUPR, AV PG, RE PG, las teclas del numpad, .....??????? o al menos decime donde puedo buscar informacion sobre eso.

otra cosa que necesito saber es como mandar un clic en una posicion en que se encuentre el mouse, y tambien necesito saber como forzar tal posicion (suponete que los valores de coordenadas los saco de strtoint(edit1) y strtoint(edit2) )

No entendiste mi duda, lo que quiero yo se saber hacer algo cada cierto intervalo (no es que no se programar intervalos de tiempo) , sino que lo que quiero hacer en un timer es....

procedure form1timer1timer()
begin
    //lo que sea que haga para forzar una tecla
end;

el tiempo se especifica en un textbox, Edit1, y se comienza con un clic en un button1, lo que quiero hacer yo es saber que hay que poner en esa linea que puse el comentario para poder forzar la presion de esa tecla (si es uno de esos mensajes de windows, diganme cual.. y como llamarlo)

eso es algo muy sencillo.. digo yo.. no se mucho de delphi pero estoy mudando de VB... y lo que uds hacen es permitir entradas restringidas, si solo necesitan un campo numerico podrian hacerlo reemplazando A y Z por 0 y 9... pero algo que nunca aprendi a hacer es forzar la presion de una tecla... o sea que cada cierto tiempo sea como si se presiona una tecla.. me gustaría que me ayuden (no lo supe hacer ni en VB, y para peorse que se puede en VB).

Holas, necesito ayuda... la verdad no lo se hacer con ningun lenguaje, pero se que los mejores programadores vienen a parar AK asi que...
Bueno la cosa es que existe un programa en un juego llamado "Argentum Online" (por cierto es un programa ilegal y no esta permitido en casi ningun caso por el staff del AO). Puede adoptar diferentes nombres pero siempre tendra unos en comun: "Macro" "Piringulete".
El Piringulete hace, cada cierto intervalo de tiempo (el cual el usuario especifica en un EDIT), una accion determinada (El mas frecuente es forzar la presion de la tecla U y un click del mouse, en las posiciones X Y que este el mouse; otro fuerza las posiciones del mouse a una determinada por el user, otros fuerzan el Enter, fuerzan las teclas para escribir "Resucitar" y fuerzan otra ves el enter).
Mi duda es si alguien puede decirme como forzar esas cosas..... Alguien me puede ayudar ?????????????????????

Mamu si lo sabes decime pliiiiiiiiiiiiiiiiiiiiiiiiiiis (mamu := appache)