Hi,
wenn du beides in einer Komponente haben willst musst du eine neue Komponente erstellen, vlt. so in dieser Art:
Delphi-Quellcode:
type
tMyRichEdit = class(tRichEdit)
private
FProgressBar: TProgressBar;
...
protected ...
public ...
published
ProgressBar: TProgressBar READ FProgressBar; //WRITE FProgressBar;
...
end;
Und für den Fortschrittsbalken (so in der Art):
Delphi-Quellcode:
procedure SetProgressBar(Send, Total: double);
begin
MyRichEdit1.ProgressBar.Position:=round(100* Send/Total);
end;
Ich hoffe, dass ich dein Problem richtig verstanden habe und dir helfen konnte.
Liebe Grüße
Sora
EDIT: Stimmt Sir Rufo, READ+WRITE ist für mich einfach Standard und ich habe nicht dran gedacht, dass nur ein READ gesetzt werden darf. Entschuldigung.