| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

проблема с richedit [Delphi, Windows]

Flea ©   (2005-11-03 19:19:00) 

Добрый вечер!
Поставил недавно кол 2.19 и после этого перестал работать richedit: приложение запускается, но  richedit на нем как будто виснет и не перерисовывается, нельзя ничего впечатать, причем если кинуть на форму еще один компонент richedit2, то этот будет работать нормально, первый же все равно не работает.
подскажите что делать? спасибо

---

Vladimir Kladov   (2005-11-04 19:41:00) [1]

Интересно, я полагал, что в 2000 уже еть RichEdit версии 5. Но в любом случае должно быть исправлено, конечно.

---

Flea   (2005-11-04 18:13:00) [2]

у меня Windows 2000, IE 5.0, Delphi 6.0, в системной директории есть 'RICHED20.DLL', 'RICHED32.DLL'

---

Vladimir Kladov   (2005-11-04 17:51:00) [3]

В общем, ситуация прояснилась. У вас, наверное, 9х/ME, и там нет msftedit.dll. В этом случае обнаруживается другой баг. Сейчас исправил, тестирую. Надо обновление делать.

---

Vladimir Kladov   (2005-11-04 15:30:00) [4]

сообщите: версия ОС, версия Internet Explorer, версия Delphi, какая(какие) из dll имеет место быть в системной директории Windows: 'msftedit.dll', 'RICHED20.DLL', 'RICHED32.DLL', 'RICHED.DLL'.

---

Flea   (2005-11-04 11:54:00) [5]

добрый день. поставил новый кол и мск 2.20 но проблема не исчезла :( более того, теперь не работает ни один из richedit брошенных на форму (хотя раньше не работал только первый из них)...

---

Flea   (2005-11-03 22:55:00) [6]

2 Thaddy: попробовал этот код: приложение запускается, но richedit все равно не работает. компонент не реагирует, на нем остается изображение тех окон что были открыты до этого...
2 Vladimir Kladov: хм, рад что чем-то помог, хотя и сам не понял чем :)
с нетерпением жду обновление...

---

Vladimir Kladov   (2005-11-03 21:39:00) [7]

спасибо за репорт. А то я голову чуть не сломал. А оказалось - проблема в rich edit'ах... Сейчас обновление приготовлю, выложу 2.20

---

Thaddy   (2005-11-03 20:09:00) [8]

Does this small demo work?
It works with me on all versions of Delphi and also on XP, NT2000 and Windows ME


{
program Project1;
uses
 Kol,
 unit1 in 'Unit1.pas';
begin
 NewForm1( Form1, nil);
 Run(Form1.form);
end.
}
unit unit1;
interface
uses
 Windows, Messages, Kol;

type

PForm1=^TForm1;
TForm1=object(Tobj)
 Form:pControl;
 Ed:PControl;
 Menu:PMenu;
public
 procedure DoMenu(sender:PMenu;Index:Integer);
end;

procedure NewForm1( var Result: PForm1; AParent: PControl );

var
 Form1:pForm1;

implementation

procedure NewForm1( var Result: PForm1; AParent: PControl );
begin
 New(Result,Create);
 with Result^ do
 begin
   Form:= NewForm(AParent,'KOLForm').SetSize(600,400).centeronparent.Tabulate;
   Applet:=Form;
   Form.Add2AutoFree(Result);
   Menu:=NewMenu(form,0,['&File','(','&New','-','&Open','-',' E&xit',')'],Domenu);
   Ed:=NewRichEdit(Form,[]).SetAlign(caClient);
   Form.SimpleStatusText:='';
 end;
end;

procedure TForm1.DoMenu(sender: PMenu; Index: Integer);
begin
 case index of
 1:Ed.Clear;
 3:with NewOpenSaveDialog('','',[])^  do
   try
     Filter:='Rich edit files|*.rtf';
     If execute then
       Ed.RE_LoadFromFile(Filename,reRtf,False);
   finally
     free;
   end;
 5:Applet.Close;
 end;
end;

end.


---

Наверх