Просмотреть текст формы из запущенной программыDelphi , Программа и Интерфейс , ФормыПросмотреть текст формы из запущенной программы
Оформил: DeeCo procedure TForm1.Button1Click(Sender: TObject); var rs: TResourceStream; ms: TMemoryStream; begin rs := TResourceStream.Create(HInstance, ClassName, RT_RCDATA); try ms := TMemoryStream.Create; try ObjectBinaryToText(rs, ms); ms.Seek(0, 0); memo1.Lines.LoadFromStream(ms); finally ms.Free; end; finally rs.Free; end; end; Here's the translation of the text into Russian: Этот код-снippet на Delphi читает текст из потока ресурсов и загружает его в компонент Memo. Разбивка кода:
Цель этого кода, вероятно, заключается в загрузке предопределенного текстового содержимого из исполняемого файла или ресурса в компонент Memo для целей отображения. Альтернативное решение: Если вы хотите упростить код, можно использовать одиночную строку для загрузки потока ресурсов в строку:
Это предполагает, что ресурс - это строковый ресурс (а не двоичный), и может быть загружен с помощью В статье описано, как просмотреть текст формы из запущенной программы в Delphi, используя ресурсный поток и память-stream. Комментарии и вопросыМатериалы статей собраны из открытых источников, владелец сайта не претендует на авторство. Там где авторство установить не удалось, материал подаётся без имени автора. В случае если Вы считаете, что Ваши права нарушены, пожалуйста, свяжитесь с владельцем сайта.
|
||||
©KANSoftWare (разработка программного обеспечения, создание программ, создание интерактивных сайтов), 2007 |