Posts by Marcio Rodrigues • 316 points
11 posts
-
0
votes1
answer36
viewsA: Can someone help me for when to give Else:print("Sorry but there is no such option"), he restart the program?
Where is opcao=int(input(... place while (True): before. It looks like this: while (True): opcao=int(input(... You can add one more option to exit the loop. It looks like this: while (True):…
pythonanswered Marcio Rodrigues 316 -
2
votes1
answer109
viewsA: devexpress component for storing Edit
In fact it is a property present in several components that accept texts, such as Edit and Combobox, for example. In the documentation look for MRU (Most Recently Used / Most Recently Used). By…
-
2
votes1
answer2001
viewsA: Run system URL daily through Windows task scheduler
Starting from the point you already know how to schedule the task, then create a batch file (*.bat) with the following line and schedule its execution: start https://answall.com This will make your…
-
1
votes1
answer147
viewsA: Error Method Update EF Core with Firebird 2.5
Cannot save to blobs fields very large values at once. As you yourself noted, the maximum size of the SQL statements in Firebird is 64 Kb. What you should do to circumvent this limit is to break the…
-
1
votes2
answers2934
viewsA: Update using values contained in another table
Try the following: update produto p set p.vlrprecocusto = (select m.vlrprecocusto from movproduto m where (m.codproduto = p.codproduto)) Explanation For each record in the "product" table the same…
-
1
votes1
answer247
viewsA: How to insert this text in Postgresql?
Part of that question has already been answered here Ritchedit Delphi messes up text when writing to Postgresql database About writing blobs using SQL statements do so: procedure…
-
1
votes1
answer533
viewsA: Richedit Delphi messes up text when writing to Postgresql database
The problem of recording like this is the type of your field in the database. Instead of using the TEXT type use the BYTEA type. Until today I never had problems with this type and Richedit,…
-
1
votes3
answers887
viewsA: Create DELPHI Component at Runtime
To extract DFM code from a component: function ComponentToStringProc(Component: TComponent): string; var BinStream:TMemoryStream; StrStream: TStringStream; s: string; begin BinStream :=…
delphianswered Marcio Rodrigues 316 -
1
votes1
answer439
viewsA: How to return an object from a bank in QTL(Mongodb)?
Declare a uses "System.JSON". If "Cursor.doc.Asjson" is a Tjsonobject object: var geometry: TJSONObject; begin geometry := Cursor.Doc.AsJSON.GetValue('geometry') as TJSONObject; Memo1.Text :=…
-
2
votes2
answers555
viewsA: Delphi - How to assign data in a multidimensional array in a single command?
I suggest the following: var MyArray: array of array of TTime; begin SetLength(MyArray, 3, 3); MyArray := [[StrToTime('08:25'), StrToTime('08:25'), StrToTime('08:50')], [StrToTime('09:25'),…
delphianswered Marcio Rodrigues 316 -
2
votes1
answer302
viewsA: Better shape in Firebird, taking safety and lightness
In general this is about business rule of its application. As to fault tolerance This is very relative, because there is flaws that it is better for the system to stop altogether than to continue…