2 respuestas en este tema

[DIEGO.CHAVEZ]

Tengo esta funcion que segun yo convierte de String  a stream ,

pero me regresa nulo 

delphi

function StringToStream(const AString: string): TStream;
begin
  Result := TStringStream.Create(AString);
end;

alguien que me pueda ayudar  > . <

[egostar]

Hola

delphi

function StringToStream(const AString: string): TStream;
begin
  Result := TStringStream.Create(AString);
end;
 
procedure TForm1.Button5Click(Sender: TObject);
begin
  memo1.Lines.LoadFromStream( StringToStream('hola changos') );
end;

Funciona sin problema  (con delphi 2007)

Saludos

Archivos adjuntos

•  4676_4dc7952d6782ea9d07bea57ea5881924aa0e4f5c.png   21,03KB   8 descargas

[DIEGO.CHAVEZ]

Muchas gracias Egostar, si ya mire una disculpa  y muchas gracias por tomarte el tiempo para verificarlo,  era error del servidor