|  | 
 
 | 
| 
 | |||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
|  | 
|  | Опции темы | Поиск в этой теме | Опции просмотра | 
| 
			 
			#1  
			
			
			
			
		 | |||
| 
 | |||
|  TFindDialog текстовый редактор Написал программу, да видимо неправильно, я выложил файл.. кто просвещёный посморите пожалуйста и подскажите в чем там проблема! | 
| 
			 
			#2  
			
			
			
			
		 | |||
| 
 | |||
|   пожалуйста посоветуйте что нибудь | 
| 
			 
			#3  
			
			
			
			
		 | |||
| 
 | |||
|   Ну вот не буду я качать что-то наваяное тобой. конкретизируй вопрос с приведением только необходимых кусков кода прямо в форуме. | 
| 
			 
			#4  
			
			
			
			
		 | |||
| 
 | |||
|   Текстовый редактор.. TFindDialog с ним проблема | 
| 
			 
			#5  
			
			
			
			
		 | |||
| 
 | |||
|   Код: procedure TfrmMain.mmiSearchClick(Sender: TObject);
begin
with FindDialog do
 begin
   FindText := Memo.SelText;
   Position := Point(TfrmMain.Left, TfrmMain.Top+
    Memo.Top + Memo.Height);
   Options := Options + [frHideUpDown, frHideWholeWord];
     Execute;
 end;
end; | 
| 
			 
			#6  
			
			
			
			
		 | |||
| 
 | |||
|   А какая ошибка-то? | 
| 
			 
			#7  
			
			
			
			
		 | |||
| 
 | |||
|   [Pascal Error] Unit1.pas(199): E2233 Property 'Left' inaccessible here [Pascal Error] Unit1.pas(199): E2233 Property 'Top' inaccessible here [Pascal Fatal Error] Project9.dpr(5): F2063 Could not compile used unit 'Unit1.pas' |