Собствено, сабж. Можно ли изменить пиктограмму для нотификатора вообще и в Андроид в частности? По умолчанию, показывается иконка приложения, а мне надо показывать несколько разных иконок.
Спасибо.
строки 147-151
procedure TForm1.ListBox1ItemClick(const Sender: TCustomListBox; const Item: TListBoxItem);
begin
Item.IsSelected := False;
MultiView1.HideMaster; // убрать
end;
вы хоть немного думаете перед тем как спрашивать ?
Первое, что пришло в голову:
Когда происходит смена ориентации, срабатывает событие OnResize, вот в нём и сравнивать ширину и высоту формы.
Upd.
Глянул пример, вот этот "C:\Users\Public\Documents\Embarcadero\Studio\15.0\Samples\Object Pascal\Mobile Samples\User Interface\Forms". Там сделано так же.
Первое что попалось "под руку" при поиске:
http://community.embarcadero.com/index.php/blogs/entry/bluetooth-le-support-in-rad-studio-xe7
http://www.youtube.com/watch?v=LcACJNNCkFo
http://www.youtube.com/watch?v=oeyGzuC_QqU
А вообще - гугл в помощь ("delphi xe7 Bluetooth")
Как Вы думаете, к чему приведет выполнение следующего кода ?
StartTime:= Now;
while ( not Embarcadero.EOF ) or ( Embarcadero.Bugs.Count > 0 ) do
begin
Trolling;
if MonthBetween(Now, StartTime) > 12 then
Embarcadero.Destroy;
end;
if ( Embarcadero.Bugs.Count > 0 ) then
begin
while Embarcadero.Members.Count > 0 do
Embarcadero.Members[0].Destroy;
Mozg.Delete( Mozg.IndexOf('Delphi') );
end else
exit;