TheRenat писал(а):
окно консоли я хочу использовать как журнал ошибок, как например в Blender.Не очень понятно, что такое "журнал ошибок"? компонент Memo?
Обычную консоль можно перетащить в свою программу как-то так.
Add(MainForm,4786198,112,175)
{
Width=585
Point(Handle)
Point(onClose)
link(onCreate,6551185:doExec,[])
link(onClose,5995727:doClose,[(151,202)(151,265)])
}
Add(WinExec,6551185,175,189)
{
FileName="cmd"
Param="/K mode con:cols=60 lines=10&&color 03 &&title консоль"
link(onExec,10692566:doDeferredEvent,[])
}
Add(FindWindow,1686983,273,189)
{
ClassName="ConsoleWindowClass"
SkipParam=1
link(onFind,15566162:doSetParent,[])
}
Add(SetParent,15566162,322,189)
{
link(NewParent,4786198:Handle,[(335,180)(167,180)(167,215)(118,215)])
}
Add(DeferredEvent,10692566,224,189)
{
Delay=10
link(onDeferredEvent,1686983:doFind,[])
}
Add(WinTools,5995727,273,238)
{
link(Handle,1686983:Handle,[])
}