Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Hello mindenkinek!
Új vagyok az FMX-ben.
Problémák merülnek fel a VCL különbségeivel.
Néhány probléma:
1) A szerkesztő egér szövegét nem lehet kiválasztani, a kiválasztás ugrik.
Azt hiszem, ez kapcsolódik az élesítéshez a tapintás alatt, hogyan kell megjavítani, és hogy lehetséges - nem találtam sehol.
2) Rács (vonal) festése az értéktől függően lehetséges?
A VCL-ben ezt az OnDrawColumnCell programban végezzük
Köszönöm!

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Az FMX-alkalmazáshoz az OSX-ablak fejlécében bitmappákat tartalmazó gombokat kellett elhelyezni:

Itt olvastam, de nem találtam megfelelő Delphi megoldást. Bármilyen ötlet?

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Általában, egy ilyen katasztrófával szembesülve, és nem tudom, hogyan kell megoldani!
Néhány konténerben fel kell töltenem az életeket, gombokat, e-maileket, címkéket és így tovább.
Ezután mindent meg kell tenni, hogy húzza a görgető dobozt, és készítsen egy másolatot ugyanabból a konténerből! Úgy tűnik, hogy mindent meg lehet tenni, de itt vagyok egy zsákutca, miért?
A TCalloutRectangle-t a formanyomtatványon dobom, elrendeztem, hogy szükségem van az elemekre, és arra tanítottam, hogy mozogjon a scrolboxban. Itt ülök, olyan boldogan nézem a kódot)
eljárás TForm1.crtPhaseMouseDown (Sender: TObject; gomb: TMouseButton; Shift: TShiftState; X, Y: Single); kezd zX: = X; zY: = Y; zIsDragging: = true; (Feladó mint TControl) .BringToFront; (Feladó mint TShape) .Fill.Color: = TAlphaColorRec.Lightblue; (Feladó mint TShape) .Rapt.Captured: = (Feladó mint TShape); végén; eljárás TForm1.crtPhaseMouseMove (Sender: TObject; Shift: TShiftState; X, Y: Single); kezdeni, ha zIsDragging és (ssLeft a Shift) Ezután kezdődik (küldő, mint TControl) .Position.X: = (küldő, mint TControl) .Position.X + X - ZX; (Feladó mint TControl) .Position.Y: = (Feladó mint TControl) .Position.Y + Y - zY; // (Feladó mint TShape). Töltsön véget; végén; Aztán ugyanazt az örömöt veszem és másolom a kódot egy másik projektből, ahol tökéletesen létrehoztam a letétbe helyezett példányokat.
eljárás TForm1.Button1Kattintson (Feladó: TObject); var Layout: TButton; elrendezés elrendezése: = TButton.Create (GridLayout1); Layout.Parent: = GridLayout1; Layout.StyleLookup: = 'MainStyle3'; Layout.Position.X: = Layout1.Position.X + 10; Layout.Position.Y: = Layout1.Position.Y + 10; Layout.Visible: = true; GridLayout1.Height: GridLayout1.Height + Layout.Height; végén; Én ülök és azt hiszem, hogy ezt csinálta, formában van, hűvösen húzódik, és megtanítom neki, hogy szaporodjon)))
De aztán egy forró majom meglepetést hoz)
A TCalloutRectangle és hasonlók nem rendelkeznek a LoockupStyle tulajdonsággal. És ez azt jelenti, hogy nem tudom elárulni neki a stílust), de jó formában mozog)
Ok, csinálok egy gombot, ez olyan, mint egy stílus, ez ügyetlen, de ez a dolog.) De nem mozdul el, és amikor rákattint, hibát ad

Az első esély kivétel 773ADAE8-on. Exception class EInvalidCast az "Érvénytelen osztálytípus-típus" üzenettel. Folyamat RPScenarioEditor.exe (4084) Mit kell tennem zavarban. Kérlek, kérlek.

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Szembesül egy ilyen probléma, (Delphi Seattle, OSX-Windows 10) formában köze a címet, ha az ingatlan értéke Transperency: = True vagy BorderStyle: = Nincs,
átmenet teljes képernyős mód nem megfelelően működött keresztül (a forma nem változik a méret a maximum), úgy döntött, hogy átmenet teljes képernyős módban telepíteni Transperency: = False BorderStyle és eltér a Semmi, de a program összeomlik, néha jobb néha 2-3 alkalommal paraméterek változására tekintet attól a ténytől, hogy megváltoztatom az átláthatóságot vagy a határt. ha fut a debuggeren, akkor esik erre -
a System.Internal.ExcUtils;
eljárás RaiseSignalException (ExceptionEIP: LongWord; FaultAddr: LongWord; ErrorCode: LongWord);
kezdődik
növelje a GetExceptionObject (ExceptionEIP, FaultAddr, ErrorCode);
végén;
a Windows alatt minden jól működik, anélkül,
az ellenőrzéshez egy üres űrlapot, két gombot adhat meg. és azt mondja a panelnek, hogy húzza az űrlapot
és három kezelő -
eljárás TForm1.Rectangle1MouseDown (Sender: TObject; gomb: TMouseButton; Shift: TShiftState; X, Y: Single);
kezdődik
ha (Button = TMouseButton.mbLeft) és (y <25) then StartWindowDrag;
végén;
eljárás TForm1.sbExpandClick (Sender: TObject);
kezdődik
i f BorderStyle = TFmxFormBorderStyle.Nincs így
BorderStyle: = TFmxFormBorderStyle.Single
egyébként BorderStyle: = TFmxFormBorderStyle.None;
végén;
TForm17.sbFullClick eljárás (Sender: TObject);
kezdődik
FullScreen: = nem FullScreen;
végén;
Lehet, hogy valaki tapasztalt OSX futásidőben változás formájában átlátható és Border bukdácsoló nem kivétel, vagy általában kezelni az átmenetet a teljes képernyős módban prozarchnoy (vagy anélkül a standard header) formában
Köszönöm

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Jó nap mindenkinek!
Az OS Capitol-os OSX frissítése után egy hatás jelent meg, ami erősen gátolja. Programomban nem használom a FullScreen formanyomtatványokat. Az a tény, hogy a FullScreen OSX több ablak nyitva van, különösen akkor, ha némelyikük modális vannak hibák, amikor a nem-modális ablak hirtelen az egész ablakot, de inaktív, azaz a. Hogy. Van egy modális ablak, amely most a hangsúly. Korábban nem loptam ezt, mert az alkalmazásom ugyanúgy nyílt ki, mint a Windows-ban. De az El Capitan frissítése után az űrlap címsorában megjelenik egy gomb a FullScreen megjelenítéséhez, függetlenül attól, hogy milyen értékek vannak a TForm megfelelő zászlókban. Van-e módja annak, hogy megakadályozzuk az ablakot a FullScreenre való áttéréshez?
Köszönöm előre.

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Egész nap egészséges. A következő problémával szembesül:
Van egy OSX-hez írt alkalmazás az FMX-re (.app, dmg-ben csomagolva). Ha a felhasználó letölti az alkalmazást a honlapon (külső oldal, nem AppStore), az indítási OSX azt mondja, hogy ez az alkalmazás nem tud futni, hogy van. Hogy. Ismeretlen kiadó és így tovább. Tehát, pontosan mit kell csinálni vele (mielőtt deploem vagy már azután), hogy az OSX ne morogjon? Csak előzetesen szeretnék tudni, mielőtt 99 dollárt fizettél a Developer programhoz való csatlakozáshoz. Köszönöm előre.

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Kedves egész nap! A leginkább alkalmatlan pillanatban a következő problémám volt:

Van egy Win és Mac alkalmazás. Működik az SQLite programmal (az FDQuery segítségével).
Természetesen az adatbázisban sok a cirillikus adat. Így a Win - minden rendben van, egy Mac (10.10) - is, minden rendben van. Megpróbáltam felvenni a második Mac-et (10.9.5) - b, és már vannak problémák a kódolással. És ő olvassa az asztaltól
S: = Query.FieldByName ('Title'); AsString; // Nem probléma, de amikor írsz az asztalra
Query.ParamByName ('Cím') AsString: = 'Cím'; A táblázat rögzíti ". "(És a rekord rosszul megy). Amikor csatlakozik az adatbázishoz, megadom, hogy a StringFormat = Unicode.

Talán találkozhat valaki ezzel?

Vannak olyan gyanúink, hogy 10.9.5-kor néhány régi dylib, ami nem működik megfelelően a cirill ábécével. akkor valószínűleg hozzá kell kapcsolódnia a sajáthoz az alkalmazáshoz, de újra, hol szerezheti meg és hogyan csatlakoztassa azt?

Számos eseményre globális kampót hozok létre:
var EvtTap: CFMachPortRef; RunLoopSource: CFRunLoopSourceRef; . eljárás CreateGlobalHook; var EvtMask: UInt64; kezdeni, ha EvtTap = nil ezután kezdődik EvtMask: = (1 SHL kCGEventKeyDown), vagy (1 SHL kCGEventFlagsChanged), vagy (1 SHL kCGEventLeftMouseUp); EvtTap: = CGEventTapCreate (kCGAnnotatedSessionEventTap, kCGTailAppendEventTap, kCGEventTapOptionListenOnly, EvtMask, @EventTapHandler, nulla); RunLoopSource: = CFMachPortCreateRunLoopSource (kCFAllocatorDefault, EvtTap, 0); CFRunLoopAddSource (CFRunLoopGetCurrent, RunLoopSource, kCFRunLoopCommonModes); végén; CGEventTapEnable (EvtTap, 1); végén; funkció EventTapHandler (proxy: CGEventTapProxy; type_: CGEventType; esemény: CGEventRef; REFCON: Pointer): CGEventRef; cdecl; var iKey: Integer; iType: Integer; kezdődik Eredmény: = esemény; iType: = CGEventGetType (esemény); iKey: = CGEventGetIntegerValueField (esemény, kCGKeyboardEventKeycode); a kCGEventFlagsChanged iType-je. ; kCGEventLeftMouseUp. ; kCGEventKeyDown. ; végén; végén; Az eseményt feldolgozó probléma van: jönnek az összes esemény kivételével kCGEventKeyDown található dokumentációt kCGEventKeyDown és kCGEventKeyUp jön csak akkor, ha az alkalmazás fut a gyökér-a vagy szerepel a „System Preferences> Security Adatvédelem-> Adatvédelem-> Hozzáférhetőség "

Tudja-e valaki, hogy programilag hozzáférhetek ezekhez az eseményekhez?

Hogyan programozhatjuk meg az egérmutató osx - tűz majom helyzetét az a-tól i-ig

Mondja meg, kérlek, hogyan alkalmazzanak globális gyorsbillentyűt az alkalmazásához az OS X rendszerben