Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 29-07-2003
Tonio Tonio is offline
Miembro
 
Registrado: may 2003
Ubicación: Logroño
Posts: 111
Poder: 21
Tonio Va por buen camino
Carga de fichero en un RichEdit

Hace un tiempo hice una pregunta referente a éste tema, no se si me expliqué bien.

Yo deseo cargar un fichero, de unas 32000 líneas, en un RichEdit, haciéndolo con LoadFromfile tarda, en mi ordenador, 1 minuto.
La pregunta es: ¿Ese tiempo es normal? y dejo de andar dándole vueltas, o hay otro método, que yo no sé, digo esto porque he 'jugado' con Streams y me tarda más, lo he hecho con ReadLn, etc y tarda muchisimo más, y yo no se más métodos.
Así que si hay uno más rápido ruego pro lo menos las líneas maestras del procedure que lo hace. Y si no lo hay también, así dejo de comerme el coco.
Lo he intentado en un campo memo y algo me falló, lo dejé. También me sirve que me digan que cabe en él o que si sirve para eso, hablo del campo memo, porque si es así lo sigo intentando hasta que lo consiga.
Uso tablas Paradox. Delphi 6.
Gracias de antemano.
Un saludo.
Tonio
Responder Con Cita
  #2  
Antiguo 29-07-2003
Avatar de __marcsc
__marcsc __marcsc is offline
Miembro
 
Registrado: may 2003
Ubicación: Girona
Posts: 577
Poder: 22
__marcsc Va por buen camino
Hola,

porqué no pruebas estos componentes?

http://synedit.sourceforge.net

Están pensados para ser un editor de código, pero son mucho más eficientes que los RichEdit normales...

A ver qué tal...
Responder Con Cita
  #3  
Antiguo 30-07-2003
Tonio Tonio is offline
Miembro
 
Registrado: may 2003
Ubicación: Logroño
Posts: 111
Poder: 21
Tonio Va por buen camino
Gracias por la respuesta.

He bajado los componentes que me dices y al compilar la unit SynKey.pas me da el siguiente error:

[Fatal Error] SynEdit.pas(1): Program or unit 'E:\JulioP\Synedit\Source\SynEdit.pas' recursively uses itself

Los uses que trae la Unit son:

En interface

uses
SysUtils,
Classes,
{$IFDEF SYN_CLX}
Qt,
Types,
QControls,
QGraphics,
QForms,
QStdCtrls,
QExtCtrls,
Math,
{$ELSE}
Controls,
Graphics,
Forms,
StdCtrls,
ExtCtrls,
Windows,
Messages,
{$ENDIF}
{$IFDEF SYN_MBCSSUPPORT}
Imm,
{$ENDIF}
SynEditTypes,
SynEditKeyConst,
SynEditMiscProcs,
SynEditMiscClasses,
SynEditTextBuffer,
SynEditKeyCmds,
SynEditSearch,
SynEditHighlighter,
SynEditKbdHandler,
{$IFDEF SYN_CLX}
kTextDrawer
{$ELSE}
SynTextDrawer
{$ENDIF}

En implementation

{$R SynEdit.res}

uses
{$IFDEF SYN_CLX}
QStdActns,
QClipbrd,
{$ELSE}
{$IFDEF SYN_COMPILER_4_UP}
StdActns,
{$ENDIF}
Clipbrd,
ShellAPI,
{$ENDIF}
SynEditStrConst;

Sobra alguno, ya he dicho que uso Delphi 6.
Gracias de antemano y perdón si es mi gran ignorancia.
Un saludo.
Tonio.
Responder Con Cita
  #4  
Antiguo 30-07-2003
Avatar de __marcsc
__marcsc __marcsc is offline
Miembro
 
Registrado: may 2003
Ubicación: Girona
Posts: 577
Poder: 22
__marcsc Va por buen camino
Has bajado la última versión estable o alguna de las versiones en desarrollo? Es que la verdad no me suena nada este error...

Creo que la última versión estable es la 1.1, que tiene fecha del 12 de julio.
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro


La franja horaria es GMT +2. Ahora son las 07:23:09.


Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi
Copyright 1996-2007 Club Delphi