Такс. ну чтож, на первый вопрос я решение нашёл, хоть и немного не стандартное. Делюсь с людьми)
(Основной моей целью было поддержать работу ГУИ в нефайловой сцене, так что мб 3д модели она так сразу не прохавоет. если хотите развивать, там не трудно, просто смотрите в редакторе какие поставили объекты и создавайте кодом аналогичные
)
1. Открываем BaseClasses, ищем там TItemsManager. в самом конце public'а дописываем:
procedure AddProcessingClass(c:TProcessingClass);
А вот и сама процедура(затульте куданить в самом юните):
procedure TItemsManager.AddProcessingClass(c:TProcessingClass);
var
i:integer;
begin
i:=length(ProcessingClasses);
SetLength(ProcessingClasses,i+1);
ProcessingClasses[ i ]:=c;
end;
Сохраняем, возвращаемся к основному.
2. Если вы юзали отдельный класс(как я и человек делавший все демки), то делюсь готовым кодом, в классе метод LoadScene.
function TYouProject.LoadScene:boolean;
var
Item:TItem;
c:TProcessingClass;
begin
Result:=False;
Core.ClearItems;
Item:=TCASTRootItem.Create(Core);
Core.Root:=Item as TRootItem;
Item:=TLookAtCamera.Create(Core);
Core.Root.AddChild(Item);
c.Interval:=30;
Core.AddProcessingClass(c);
TBaseProcessing(Item).ProcessingClass:=0;
Item:=TGUIRootItem.Create(Core);
Core.Root.AddChild(Item);
TBaseProcessing(Item).ProcessingClass:=0;
Item:=T2DFitter.Create(Core);
Core.Root.Childs[1].AddChild(Item);
TBaseProcessing(Item).ProcessingClass:=0;
Item:=T3DFitter.Create(Core);
Core.Root.Childs[1].AddChild(Item);
TBaseProcessing(Item).ProcessingClass:=0;
{$IFDEF LOGGING}
Log.Log(ClassName+'.LoadScene: Scene load successful',lkNotice);
{$ENDIF}
Core.SendMessage(ItemMsg.TSceneLoadedMsg.Create,nil,[mfBroadcast,mfCore]);
Result:=True;
end;
3. Что подключать в юзес думаю вы поймёте сами, если не поймёте(уж простите, фильтровать влом было), вот мой юзес:
uses
SysUtils, TextFile, Basics, AppsInit, OSUtils, WApiMsg,
Resources, BaseGraph, BaseTypes, BaseMsg, Base3D,
C2Res, C2VisItems, C2Anim, C22D, C2FX, C2Land, C2TileMaps,
ACS, ACSAdv, ACSBase, C2GUI, GUIMsg, Dialogs, Windows,
C2Visual, C2Affectors, C2ParticleAdv, BaseClasses, GUIFitter,
ItemMsg,
C2Render, C2DX8Render,
Input, WInput,
CAST2, C2Core,
Timer, GUIManager;
Author
Topic: Набор вопросов (Read 2501 times)
Quick Reply