скрыть

скрыть

  Форум  

Delphi FAQ - Часто задаваемые вопросы

| Базы данных | Графика и Игры | Интернет и Сети | Компоненты и Классы | Мультимедиа |
| ОС и Железо | Программа и Интерфейс | Рабочий стол | Синтаксис | Технологии | Файловая система |



Google  
 

Просмотреть текст формы из запущенной программы



Оформил: 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;





Copyright © 2004-2018 "Delphi Sources". Delphi World FAQ


Delphi 10.2 Tokyo

Delphi 10.2 Tokyo — самый быстрый способ создавать и обновлять интенсивно работающие с данными, распределенные и сильно взаимодействующие приложения с развитым и визуально привлекательным пользовательским интерфейсом для Windows 10, Mac, мобильных устройств, IoT и других платформ.



Группа ВКонтакте   Facebook   Ссылка на Twitter