HiAsm

Вверх ↑

Форумы Задачи Так что с идеей "супер инлайн кода " ? ← Ctrl12 3 4 5Ctrl →

Ответов: 16884

Рейтинг: 1239

#1: 2014-12-16 18:07:40 ЛС | профиль | цитата

AlexKir писал(а):

MT_AddData не работает с потоком через "пустую точку"

Это кто сказал ? А примерчик можно ?
Хотя ...

AlexKir писал(а):

Надо будет и на линукс хайсм поставить а то реакция на советы и замечания на форуме запаздывает

AlexKir писал(а):

Извини до твоих новых супер-лаконичных схем пока не добрался ....

Ну и нахрена писать советы и замечания, учитывая твою реакцию ?
Так что извини, но это мой последний пост в этой теме.

AlexKir писал(а):

2 Нет доступа к верхним точкам данных ..

Да ну !
A это что ?


Add(MainForm,2953706,21,217)
{
 Height=103
}
Add(FTCG_Tools,16390730,126,217)
{
 @Color=43775
 link(onPrint,13018366:doText,[])
 link(D0,9653854:Text,[])
 link(D1,14106343:Text,[])
 link(D2,140888:Text,[])
 AddHint(79,-46,15,13,@Hint)
}
BEGIN_SDK
  Add(EditMultiEx,2162739,21,16)
  {
   WorkCount=#7:doPrint|
   EventCount=#7:onPrint|
   DataCount=#2:D0|2:D1|2:D2|
   Width=426
   Height=186
   link(doPrint,15178761:doPrint,[(39,22)(39,43)])
  }
  Add(VisualInline,15178761,56,37)
  {
   Lines=#28:Var  T1, T2, T3, RD :Double;|6:begin |20:// RD:=ToReal(Data);|49:T1:=toRealEvent(THIFTCG_Tools(FParent).Datas[0]);|49:T2:=toRealEvent(THIFTCG_Tools(FParent).Datas[1]);|50:T3:=toRealEvent(THIFTCG_Tools(FParent).Datas[2]); |13:RD:=T1+T2+T3;|49:_hi_OnEvent(THIFTCG_Tools(FParent).Events[0],Rd);|4:end;|
   Width=376
   Height=148
  }
END_SDK
Add(Button,16015009,70,217)
{
 Left=25
 Top=35
 Width=70
 Caption="Сложить"
 Data=Integer(100)
 link(onClick,16390730:doPrint,[])
}
Add(Edit,13018366,189,217)
{
 Left=110
 Top=35
 Width=160
}
Add(Edit,9653854,126,91)
{
 Left=55
 Top=5
 Text="100"
}
Add(Edit,14106343,133,126)
{
 Left=125
 Top=5
 Text="50"
}
Add(Edit,140888,140,161)
{
 Left=185
 Top=5
 Text="20"
}

или так (что более профессионально)


Add(MainForm,2953706,21,217)
{
 Height=103
}
Add(FTCG_Tools,16390730,126,217)
{
 @Color=43775
 link(onPrint,13018366:doText,[])
 link(D0,9653854:Text,[])
 link(D1,14106343:Text,[])
 link(D2,140888:Text,[])
 AddHint(79,-46,15,13,@Hint)
}
BEGIN_SDK
  Add(EditMultiEx,2162739,21,16)
  {
   WorkCount=#7:doPrint|
   EventCount=#7:onPrint|
   DataCount=#2:D0|2:D1|2:D2|
   Width=510
   Height=375
   link(doPrint,15178761:doPrint,[(39,22)(39,43)])
  }
  Add(VisualInline,15178761,56,37)
  {
   Lines=#6:begin |31:With THIFTCG_Tools(FParent) do |22:_hi_OnEvent(Events[0],|26:    toRealEvent(Datas[0])+|26:    toRealEvent(Datas[1])+|28:    toRealEvent(Datas[2])); |4:end;|
   Width=446
   Height=127
  }
END_SDK
Add(Button,16015009,70,217)
{
 Left=25
 Top=35
 Width=70
 Caption="Сложить"
 Data=Integer(100)
 link(onClick,16390730:doPrint,[])
}
Add(Edit,13018366,189,217)
{
 Left=110
 Top=35
 Width=160
}
Add(Edit,9653854,126,91)
{
 Left=55
 Top=5
 Text="100"
}
Add(Edit,14106343,133,126)
{
 Left=125
 Top=5
 Text="50"
}
Add(Edit,140888,140,161)
{
 Left=185
 Top=5
 Text="20"
}

М.Задорнов писал(а):

И не надо лохматить бабушку.

и "сосать из пальца" проблемы.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Форумы Задачи Так что с идеей "супер инлайн кода " ? ← Ctrl12 3 4 5Ctrl →