estra

а что сложно написать пару строк кода?

Сложного ничего, но ведь суть вопроса не в этом...

Попробуй вырезать ненужную зависимость утилитой CFF Explorer

или это опять "свой мир" fmx?

Речь не только о fmx, в vcl такая конструкция тоже встроена.

• При const может создаваться копия передаваемых данных.
• При Ref копия не делается, поэтому есть небольшая выгода по памяти.

Ярослав, вы не могли бы прояснить эту ситуацию? В каких случаях константа передается по ссылке, а в каких по значению? Для fm это (возможно) может зависеть от компилятора, а вот с vcl все еще темнее... Одним словом, как, глядя на код procedure test(const i: Integer), я (как программист) могу понять - константа будет передана по ссылке или по значению?

Сам спросил, сам отвечаю - Constant Parameters. Хотя зачем передавать константу по ссылке я не очень понял, ну да ладно, пусть будет раз сделали...

Собственно сабж. Пример, где это можно встретить:

procedure TForm2.WebBrowser1Tap(Sender: TObject; const [Ref] Point: TPointF);
begin

end;

Не просто в uses, а именно в файле проекта (.dpr). Про этот баг давно в quality.embarcadero написано, но похоже в Embarcadero его не считают критическим (или вообще багом не считают).

Проблема все еще актуальна... Кто в курсе, как победить проблему, поделитесь решением пожалуйста...

Когда ожидать?

Одна из презентаций лежит здесь, но хотелось бы найти и остальные.

 

где можно скачать презентационные материалы, представление на семинаре в Москве?

https://onedrive.live.com/redir?resid=6F5EAC5B9D042042!4961&authkey=!AEoTXbnPYPhSm4I&ithint=folder%2cpdf

 

За ссылочку, конечно, спасибо, но я не это имел ввиду. Я имел ввиду презентации докладчиков.

Ярослав, где можно скачать презентационные материалы, представление на семинаре в Москве?

Brovin Yaroslav - да, все добавлено

ZuBy - попробую (завтра), о результатах отпишусь.

Столкнулся с непонятным явлением. На одной машине стоят XE7 и 10 Seattle. XE7 без проблем обнаруживает все подключаемые девайсы, 10 Seattle не видит ни одного. В чем может быть проблема?

Как заставить это "чудо" принимать без лишних вопросов любые сертификаты на iOS и Android?

В Objective-C это делается просто

+(BOOL)allowsAnyHTTPSCertificateForHost:(NSString*)host {
    return YES;
}

В Java тоже нет никаких проблем

@Override
public viod onReceivedSslError(WebView view, SslErrorHandler handler, SslError error) {
    handler.proceed();
}

Только в FM непонятно как провернуть такой финт. Помогите, знающие люди!

C ZXing я делал, работало нормально, правда если QR код маленького размера, он его не читает.

Еще можно попробовать через pic2shop, примеры есть в интернете.

SVTX если не трудно, пожалуйста, поделитесь решением, очень нужно.

Обратите внимание, что там указано имя прикрепляемого файла без пути к нему. По описанию ситуации очень похоже на ошибку в этом месте.

Вы правы, ошибка оказалась именно в этом. Еще раз большое спасибо!

Спасибо за пример, работает отлично. Осталось понять, почему у меня не работало. Если разберусь, отпишусь...

Вот какая беда обнаружилась. Если прикреплять файл к письму руками, то размер файла определяется верно (на скрине слева), а если программно, то неверно (на скрине справа). Возможно проблема в этом, но почему так происходит, непонятно.
 

Belov.V, вы не могли бы выложить небольшой работающий примерчик, если не сложно?

Заполнение поля "Кому:"

Спасибо, помогло!

по поводу пути, да, лежат именно в Androidapi.IOUtils.getExternalFilesDir. Буду разбираться.

Путем поисков и мучений:

А вот у меня ваш код почему то не работает. При отправке файл вкладывается в сообщение

но до получателя письмо доходит без вложения. Кроме того, не получается программно добавить адрес получателя. Делаю так

Intent.putExtra( TJIntent.JavaClass.EXTRA_EMAIL, StringToJString( 'aaa@mail.ru' ) );

но поле "кому" остается пустым (на скрине это видно).

Давно дело было, вспомнить бы... В сертификатах проблема была, переустановка помогла

Попробуйте, может поможет.

Я просто показал принцип, а доведение до ума - дело не хитрое. Можно перемешать 6 кнопок как я показал, затем первые 3 отобразить в первом столбце, а последние 3 во втором. При перемешивании действий нужно учесть, что надписи на кнопках должны этим действиям соответствовать, а следовательно придется либо перемешивать кнопки, либо каким то образом менять на них текст.

var
  Buttons: array[0..5] of TButton;

procedure TForm1.FormCreate(Sender: TObject);
var
  i, j: Integer;
begin
   for i := 0 to 5 do
      Buttons[i] := FindComponent( Format( 'Button%d', [i+1] ) ) as TButton;
   Randomize;
   for i := 1 to 1000 do
   begin
      j := Random( 5 );
      Buttons[j].Position.Y := Buttons[j].Position.Y + Buttons[j+1].Position.Y;
      Buttons[j+1].Position.Y := Buttons[j].Position.Y - Buttons[j+1].Position.Y;
      Buttons[j].Position.Y := Buttons[j].Position.Y - Buttons[j+1].Position.Y;
   end;
end;

RandomButton.zip