PDA

Ver la Versión Completa : Delphi, ahora strings


tuflotas
24-11-2007, 15:01:12
Hola, ahora me salen errores en los strings, en pascal yo los usaba con un valor que queria que tuviese la cadena entre corchetes, bueno en delphi no puedo? el caso es que los cambie a parentesis pero tampoco me deja

el codigo queda asi


PROCEDURE puntosenf(VAR f:string(10));
{inicializo todas las filas a .}
VAR i:integer;
BEGIN
for i:=1 TO 10 DO
f(i):='.';
END;{procedure}


pero me dice que espera entre el string y el 10 ';' o ')' pero no '(' alguien sabe que le pasa a esto?

ixMike
24-11-2007, 15:08:18
Efectivamente debería ser con corchetes:



Procedure PuntosEnF(var F: String[10]);
var
I: Integer;
begin
for I:=1 to 10 do
F[I]:='.';
end;



Supongo que el fallo cuando usabas los corchetes estaba a la hora de llamar al procedure. De todas formas, pienso que lo mejor sería esto:



Procedure PuntosEnF(var F: String);
var
I: Integer;
begin
for I:=1 to Length(F) do
F[I]:='.';
end;




Así no importa la longitud de la cadena, siempre se llenará entera de puntos.


Saludos.

tuflotas
24-11-2007, 15:11:12
es que la cadena tiene que ser de 10 obligatoriamente pro eso, es que no se, voy a ver la llamada, por cierto, como pongo eso de codigo delphi? es que iempre escribo pero no se como ponerlo

ixMike
24-11-2007, 15:15:05
es que la cadena tiene que ser de 10 obligatoriamente pro eso, es que no se

Bueno, tú cuando la llames utiliza una variable de 10 carácteres:



var
mide10: string[10];
begin
{...}
PuntosEnF(mide10);
{...}
end;




por cierto, como pongo eso de codigo delphi? es que siempre escribo pero no se como ponerlo

Pues pones el código entre DELPHI y /DELPHI (ambas palabras entre corchetes, claro, porque son etiquetas).

tuflotas
24-11-2007, 15:52:51
gracias!!!