ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Több ListBox-e jogcím-s, úgy állítsa be a Szerkesztés-s. Amikor megpróbálok szerkeszteni az alsó szerkesztése-k, a billentyűzet fedi őket, és nem látja, hogy a beírt (példámnál ez House). Hogyan megjavítani?







ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig
ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

És hogyan lehet úgy, hogy a billentyűzet helyett az Enter gomb a Befejezés gombra, a gomb megnyomásával, ami rejtve Claudia?

linkek megosztása

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Csináltam típus „ScrollableForm”. Ha megnyitjuk a billentyűzet tolódik formában, minden úgy működik, ahogy kellene, de ha beírása után kattintson a „Mentés” gombra történik közel a billentyűzet és a shift gomb a „Mentés”, és ennek megfelelően megtakarítás nem fordul elő, és ez több időt vesz igénybe, hogy nyomja meg a gombot.
Lehetőség van-hoz kap körül, mint például, hogy a késedelem a lezáró billentyűzet?

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Hello mindenkinek. Tanulom dolgozni ini-fájlt Android. És azonnal volt a probléma, hogy nem tudom megoldani. Akartam írni a hasonlóság teszt alkalmazás adattároló az ini fájlban. Ennek eredményeként minden jól működik a Windows, de az Android indítási lóg firemonkey mindössze 10 másodperc alatt, és az alkalmazás ikonja kivágják, és nem indul el. Mi lehet a probléma? Én használ a hibakeresés USB-n keresztül.
TIniFile * Ini = new TIniFile (System :: Ioutils :: TPath :: GetDocumentsPath () + PathDelim + "options.ini"); Yuzayu ezeket a könyvtárakat
#include #include

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Helló
Írok Delphi 7. Minden rendben volt, amíg meg nem jelennek meg androide adatgyűjtés terminál. 10. Delphi, hogy írjon egy egyszerű alkalmazást. De volt egy probléma az adatok beviteléhez a beviteli mezőt a vonalkód olvasó. Egy interneten találtam, hogy az ügy megoldódott egyszerűen szándék. Általában az ablakokban szeretem csinálni: lóg folyamat, amely figyeli a com-port, és a megjelenése az adatokat elküldi őket, hogy a megfelelő helyre. Az Android nem lesz nehéz. De én zavaros ez az egész halom lehetőségek és funkciók, a küldött és fogadott „szándék”.
Általában ez az, amit abban a pillanatban.
A szkenner beállításai van írva:

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Jó napot!
Oldjuk meg a következő problémát, az alkalmazás dinamikusan generált különböző tárgyakat, az örökösök az azonos osztályban. Amikor tárgyát képező kitölti dinamikus tömbjére. Következő, szeretnék menni egy külön téma minden elemét a tömb, hogy az állam, hogy van, hogy egy kérést a szerver. Minden úgy lógott egy időzítő minden második rendelkezik a kérés feldolgozásához. Minden többé-kevésbé működik a Windows és az Android app végül esik. Itt az időzítő kód, olvashatóság eltávolítottam a darab különböző változatai E. RootElements - egy sor TEssense amelynek örökösei. Funkciók GetBoardCurrentValue, GetBoardMaxValue - lényegében azt kéri, hogy a szerver.
Azonnali, hogy teszek ki a munkafolyamat dolgozni Android?
eljárás TForm1.MasterTimerTimer (Sender: TObject); kezdenek TTask.Run (eljárás var l, d, egy: byte; i, j: integer; E: TEssence; p: Pointer; VirtualNode: IXMLNode; VirtualElementNode: IXMLNode; ID: byte; kezdődik l: = hossz (Form1.RoomElements ); j: = 0, hogy l - 1 do kezdődik E: = Form1.RoomElements [j]; // kapcsoló ha E TRele ezután kezdődik d: = (E, mint TRele) .Device_ID; a: = (E, mint TRele ) .Device_Adress; ha Form1.GetBoardCurrentValue (d, a) = igaz, akkor kezdődik TThread.Synchronize (nulla, eljárás kezdődik (E, mint TRele) .ReleSwitch.IsChecked: = Form1.device [d] .Board [a] .CurrentValue. ToBoolean; a végén); end; // (E, mint TRele) .ReleOnTimer (E) vége // tompítási mást, ha E jelentése TDimmer ezután kezdődik d: = (E, mint TDimmer) .Device_ID; a: = (E, mint TDimmer). Device_Adress; ha Form1.GetBoardMaxValue (d, a) = igaz, akkor kezdődik TThread.Synchronize (nulla, eljárás kezdődik, ha (Form1.device [d] .Board [a] .Type_ID = TType.Svetodiod) vagy (Form1.device [d ] .Board [a] .Type_ID = TType.Dimmer220) ezután kezdődik (E, mint TDimmer) .DimmerValue.Text: = (Form1.device [d] .Board [a] .MaxValue) .ToString; end; en d); end; // (E, mint TDimmer) .DimmerOnTimer (E) vége // Timer mást ha E TSTimer ezután kezdődik ID: = (E, mint TSTimer) .STimerIndex; Form1.FillHTTPRequest (0, 0, HTTP_GET_TIMER_INFO, id); ha Form1.AnswerIsComming = HTTP_GET_TIMER_INFO ezután kezdődik TThread.Synchronize (nulla, eljárás kezdődik, ha Form1.HTTPAnswer.Data1 = 0, akkor (E, mint TSTimer) .Interval.Text: = 'OFF' mást (E, mint TSTimer) .Interval.Text: = 'ON' vége); végén; // (E, mint TSTimer) .STimerOnTimer (E); végén; végén; end); végén;






ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Jó napot kívánok. Van android alkalmazás, van egy párbeszédablak, amely kínál lépj a Google Play és letölteni más alkalmazás (Pro verzió), 2 gomb (igen / nem). Hogyan kell végrehajtani ezt az átmenetet a Google játszani, hogy szükséges a kérelem le azonnal. Azt Delphi XE7

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Jó napot kívánok. Ki tudja, azonnali, akár firemonkey azt jelenti, hogy lehet változtatni az ikont az alkalmazás futási időben, vagy azt követően bezárása és újbóli megnyitása az alkalmazás? A win úgy tűnik, hogy ez lehetséges, a cikket találtam a fórumon, de nem találja az Android.

Legutóbb Campiglio alkalmazás Delphi FMX Android elérésekor a szerver https amikor a Get kérésére TIdHttp keresett alkatrészek könyvtár „Nem lehet betölteni SSL könyvtár” kifejezés sslvTLSv1_2 protokoll ablakok pénztárgépeket az android nem. Ástam ki, hogy tud-e csatlakozni a könyvtár és libssl.so libcrypto.so keresztül telepítési .assets \ belső. És itt van, hogy a kódot a saját használatra egy primerchik nem megállapított, bár, és megvitatták az interneten 100-szor, mindketten csavarozva IdSSLIOHandlerSocketOpenSSL1.SSLOptions.CertFile. Ha van egy kód feküdt ki kérem? skinte vagy e-mailben [email protected]
IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Method.sslvTLSv1_2;
IdSSLIOHandlerSocketOpenSSL1.SSLOptions.Mode.sslmUnassigned;

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Jó napot, barátok. Mondja, ez lehet nyitni firemonkey formában, ahogy az alábbi képen? Ha igen, mondd meg, merre kell ásni. Köszönöm.

ListBox, szerkesztése és billentyűzet - tlistbox - tűz majom tól Z-ig

Készítse el vizualizációs komponens Label Edit látni. Ábra.
még egy címke jelenik meg a fordítás során. És nem lehet másolni kész kompnonent amikor alakzatok - egy hiba.
Kérdezzen, hogyan lehet megszabadulni a duplikált.
t
írja TShowLabel = (megjelenítése, elrejtése); TEditVisualLabel = osztály (tSzerkesztés) magán TextLabel. TLabel; FloatVErt. TFloatAnimation; FloatSize. TFloatAnimation; FloatColor. TColorAnimation; FLabCAp. string; funkció GetSHow: TShowLabel; Eljárás SetShow (Value TShowLabel.); funkció GetLabelCaption: string; Eljárás SetLabelCaption (Value húr.); funkció GetLabelFontColor: TAlphaColor; Eljárás SetLabelFontColor (Value TAlphaColor.); működni GetStopValue. egységes; eljárás SetStopValue (Value egységes.); működni GetStartValue: Single; eljárás SetStartValue (Value egységes.); működni GetStopFont: Single; eljárás SetStopFont (Value egységes.); működni GetStartFont: Single; eljárás SetStartFont (Value egységes.); védett eljárás megadása (Sender TObject.); eljárás Exi (Sender TObject.); nyilvános közzétett ingatlan LabelFontColor. TAlphaColor olvasni GetLabelFontColor írási SetLabelFontColor; ingatlan LabelCaption: string olvasni GetLabelCaption írási SetLabelCaption; ingatlan LabelPositionStop. Egységes olvasási GetStopValue levelet SetStopValue; ingatlan LabelPositionStart. Egységes olvasási GetStartValue levelet SetStartValue; ingatlan LabelSizeStopFont. Egységes olvasási GetStopFont levelet SetStopFont; ingatlan LabelSizeStartFont: Single olvasni GetStartFont levelet SetStartFont; ingatlan LabelVisible. TShowLabel olvasni GetSHow írási SetSHow alapértelmezett TShowLabel (1); kivitelező létrehozása (aowner: TComponent) felülbírálhatja; végén; eljárás nyilvántartását; végrehajtási eljárás Regisztráció; kezdenek RegisterComponents ( 'minták', [TEditVisualLabel]); végén; kivitelező TEditVisualLabel.Create (aowner: TComponent); var Del: TLabel; Család, Style, FONTCOLOR. TStyledSetting; kezdődik öröklött létrehozása (AOwner); TextLabel: = TLabel.create (Self); TextLabel.Parent: = self; // A legvalószínűbb, hogy itt, hogy az egész dugulás miért kétszer hajtjuk végre TextLabel.StyledSettings: = [Család]; TextLabel.Align: = TAlignLayout (2); TextLabel.TextSettings.FontColor: = TAlphaColorRec.Silver; TextLabel.TextSettings.Font.Size: = 14; TextLabel.SetSubComponent (true); FloatVErt: = TFloatAnimation.Create (TextLabel); FloatVErt.Parent: = TextLabel; FloatVErt.PropertyName: = 'Position.Y'; FloatVErt.StopValue: = -20; FloatVErt.StartValue: = 0; FloatSize: = TFloatAnimation.Create (TextLabel); FloatSize.Parent: = TextLabel; FloatSize.PropertyName: = 'TextSettings.Font.Size'; FloatSize.StopValue: = 11; FloatSize.StartValue: = 14; FloatColor: = TColorAnimation.Create (TextLabel); FloatColor.Parent: = TextLabel; FloatColor.PropertyName: = 'TextSettings.FontColor'; FloatColor.StartValue: = TAlphaColorRec.Silver; LabelFontColor: = TAlphaColorRec.Black; LabelVisible: = TShowLabel (0); TextLabel.Align: = TAlignLayout (2); //TextLabel.Width: = 5000; //FloatColor.StopValue: = LabelFontColor; OnExit: = Exi; OnEnter: = Adja; végén; eljárás TEditVisualLabel.Enter (Sender TObject.); kezdődik örökölt; ha TextLabel.Position.Y<>FloatVErt.StopValue ezután kezdődik FloatVErt.Inverse: = false; FloatVErt.Start; FloatSize.Inverse: = false; FloatSize.Start; FloatColor.Inverse: = false; FloatColor.Start végén; végén; eljárás TEditVisualLabel.Exi (Sender: TObject); kezdődik örökölt; ha (Self.Text = '') és (TextLabel.Position.Y<>0), akkor kezdődik FloatVErt.Inverse: = true; FloatVErt.Start; FloatSize.Inverse: = true; FloatSize.Start; FloatColor.Inverse: = true; FloatColor.Start végén; végén; funkció TEditVisualLabel.GetLabelCaption: string; kezdődik eredmény: = TextLabel.Text; végén; funkció TEditVisualLabel.GetLabelFontColor: TAlphaColor; kezdődik Eredmény: = FloatColor.StopValue; végén; funkció TEditVisualLabel.GetSHow: TShowLabel; kezdeni, ha TextLabel.Visible majd Eredmény: = TShowLabel (0) mást Eredmény: = TShowLabel (1); végén; működni TEditVisualLabel.GetStartFont: Single; kezdődik Eredmény: = FloatSize.StartValue; végén; működni TEditVisualLabel.GetStartValue: Single; kezdődik Eredmény: = FloatVErt.StartValue; végén; működni TEditVisualLabel.GetStopFont: Single; kezdődik Eredmény: = FloatSize.StopValue; végén; működni TEditVisualLabel.GetStopValue: Single; kezdődik Eredmény: = FloatVErt.StopValue; végén; eljárás TEditVisualLabel.SetLabelCaption (Érték: string); kezdődik TextLabel.Text: = érték; végén; eljárás TEditVisualLabel.SetLabelFontColor (Érték: TAlphaColor); kezdődik FloatColor.StopValue: = érték; végén; eljárás TEditVisualLabel.SetShow (Érték: TShowLabel); kezdeni, ha az érték = TShowLabel (0), majd TextLabel.Visible: = true else TextLabel.Visible: = False; végén; eljárás TEditVisualLabel.SetStartFont (Érték: Single); kezdődik FloatSize.StartValue: = érték; TextLabel.TextSettings.Font.Size: = Érték; végén; eljárás TEditVisualLabel.SetStartValue (Érték: Single); kezdődik FloatVert.StartValue: = érték; végén; eljárás TEditVisualLabel.SetStopFont (Érték: Single); kezdődik FloatSize.StopValue: = érték; végén; eljárás TEditVisualLabel.SetStopValue (Érték: Single); kezdődik FloatVert.StopValue: = érték; végén; végén.

Most az oldalt 0 felhasználó

Nem ember nézi ezt az oldalt