Ver Mensaje Individual
  #1  
Antiguo 23-01-2007
marcoev marcoev is offline
Miembro
 
Registrado: may 2003
Ubicación: Nogales, Sonora, Mex.
Posts: 57
Reputación: 22
marcoev Va por buen camino
Guuardar texto de Richedit a campo Blob

Buenas tardes, espero y alguien pueda ayudarme con este problemita.

Lo que pasa es que estoy intentando enviar por medio de una consulta de SQL el texto que se encuentra dentro de un componente TrzRichEdit (Es de los componentes de Rize), pero cuando lo guarda, este se va sin Formato, pero si utilizo el componente que se liga a la base de datos, tal como un DBRichEdit el texto se guarda en binario y el formato del texto se mantiene, entonces necesito saber que es lo que tengo que guardar desde el RichEdit normal para que se guarde con formato.
Este es el codigo que utilizo para enviar los datos a la base de datos.
Código Delphi [-]
    with dmDatos.qDatos do begin
      SQL.Clear;
      Close;
      if nuevo then
        SQL.Text:='INSERT INTO FORMULAS (Formula, UsoTerapeutico) VALUES ('+QuotedStr(Trim(edNombre.Text))+', :Uso)'
      else
        SQL.Text:='UPDATE FORMULAS SET Formula = '+QuotedStr(Trim(edNombre.Text))+', UsoTerapeutico = :Uso WHERE IdFormula = '+
          dmDatos.qFormulas.FieldByName('IdFormula').AsString;
      ParamByName('Uso').AsBlob:=edUso.Text;
      ExecSQL;
    end; //with
Saludos, espero y alguien pueda responderme. gracias
__________________
saludos a todos y gracias por compartir sus conocimientos y experiencias... ;-)
Responder Con Cita