механика к однорукому бандиту (не OpenGL)

Вверх ↑

Форумы Схемымеханика к однорукому бандиту (не OpenGL) ← Ctrl1Ctrl →

Этот топик читают: Гость

Ответов: 875

Рейтинг: 322

#1: 2009-11-17 00:00:18 ЛС | профиль | цитата

ремикс - все картинки взяты у sla8a

карма: 1

файлы: 1

koleso.rar [46KB] [207]

Голосовали:

Rulet

Ответов: 2437

Рейтинг: 693

#2: 2009-11-17 19:34:00 ЛС | профиль | цитата

kamakama, а что картинки дергаются как припадочные?

Халтура.
Может лучше так:


Add(MainForm,2953706,140,175)
{
 Color=8421376
 link(onCreate,4979796:doEnum,[])
}
Add(ChildPanelEx,4979796,308,189)
{
 link(Array,7770792:Var,[])
}
BEGIN_SDK
  Add(EditMultiEx,16107449,21,21)
  {
   WorkCount=#6:doEnum|6:doNext|
   DataCount=#5:Array|
   Width=321
   Height=319
   link(doEnum,2093148:doEnum,[(63,27)(63,146)])
   link(doNext,807611:doNext,[(70,34)(70,202)])
  }
  Add(Panel,6735178,252,140)
  {
   Left=35
   Top=105
   Width=64
   Height=64
   BevelInner=0
  }
  Add(PaintBox,7459256,252,182)
  {
   Top=-512
   Width=64
   Height=576
   Point(doTop)
  }
  Add(ArrayEnum,2093148,105,140)
  {
   link(onItem,11713081:doRead,[])
   link(onEndEnum,7459256:doRefresh,[(149,153)(149,188)])
   link(Array,7930131:Array,[])
  }
  Add(StrList,7930131,91,63)
  {
   Strings=#1:1|1:2|1:3|1:4|1:5|1:6|1:7|1:8|1:1|
  }
  Add(ArrayRW,11713081,168,140)
  {
   link(onRead,4301786:doDraw,[(226,146)(226,286)])
   link(Array,16107449:Array,[(174,44)(27,44)])
  }
  Add(Img_Bmp,4301786,252,280)
  {
   Point(Y)
   link(onDraw,7683956:doNext,[(307,286)(307,222)(260,222)(260,237)])
   link(Bitmap,7459256:Bitmap,[])
   link(Y,7683956:Count,[])
  }
  Add(Counter,7683956,266,231)
  {
   Max=576
   Step=64
  }
  Add(Counter,807611,112,196)
  {
   Min=-512
   Max=0
   Step=2
   link(onNext,7459256:doTop,[])
  }
END_SDK
Add(Timer,189195,259,196)
{
 Interval=10
 Enable=1
 Point(onStop)
 link(onTimer,4979796:doNext,[])
}
Add(Button,13627762,210,196)
{
 Left=110
 Top=235
 link(onClick,189195:doTimer,[])
}
Add(LineBreak,15658730,308,140)
{
 Caption="BitmapArray"
 Type=1
 Primary=[7770792,0,21]
}

карма: 11

Ответов: 8

Рейтинг: 1

#3: 2009-11-25 00:53:17 ЛС | профиль | цитата

Не работает схема !?!?

Версия HiAsm 4.04 b182 + Last Update + Last SVN 25.11.09

компилим вот ответы:

ответ FPC:
hiMultiStrData.pas(51,1) Fatal: Syntax error, "BEGIN" expected but "shl" found
Error: C:\HiAsm\compiler\fpc\ppc386.exe returned an error exitcode (normal if you did not specifiy a source file to be compiled)

ответ BD4:
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(51) Error: Declaration expected but '<' found
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(53) Error: Undeclared identifier: '_work_doSplit1'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(57) Error: '(' expected but ':=' found
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(58) Error: '(' expected but ':=' found
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(58) Error: Undeclared identifier: '_Data'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(58) Error: Incompatible types
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(62) Error: Undeclared identifier: '_prop_From'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(63) Error: Undeclared identifier: 'rparse'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(63) Error: Undeclared identifier: '_prop_Char'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(63) Error: Incompatible types
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(64) Error: Undeclared identifier: 'FOutCount'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(65) Error: Undeclared identifier: 'onPart'
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(65) Error: '(' expected but ',' found
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(65) Error: Not enough actual parameters
C:\HiAsm\Elements\delphi\code\hiMultiStrData.pas(68) Error: Declaration expected but '>' found

карма: 0

Разработчик

Ответов: 4698

Рейтинг: 426

#4: 2009-11-25 08:30:12 ЛС | профиль | цитата

У тебя испорчены исходники, у меня последнее обновление с svn+HiUpdate(только что обновил) и все нормально работает

карма: 10

Мой сайт, Мои рассказы

Ответов: 8

Рейтинг: 1

#5: 2009-11-26 23:35:09 ЛС | профиль | цитата

Да все работает! Супер получилось!!!

карма: 0

Форумы Схемымеханика к однорукому бандиту (не OpenGL) ← Ctrl1Ctrl →


Сообщение ...
Прикрепленные файлы (файлы не залиты)