Your browser does not seem to support JavaScript. As a result, your viewing experience will be diminished, and you may not be able to execute some actions.

Please download a browser that supports JavaScript, or enable it if it's disabled (i.e. NoScript).

Problem with ADOTable

meriah

procedure TForm1.Button1Click(Sender: TObject);
begin
 list1:=ADOTable1.FieldByName('login').AsString;
 label3.Caption:=list1;
 list2:=ADOTable1.FieldByName('password').AsString;
 label4.Caption:=list2;
 If edit2.Text=list2 Then label5.Caption:='0'
 else label5.Caption:='1';
end;

The condition is always incorrect (label5 turns 1), although the right password is inserted into edit2. Tell me what I'm doing wrong.

A
amarantha last edited by

I can assume it's faint. varchar- and ADOTable1.FieldByName('password').AsString returns, let's not. "pass"♪ "pass "♪ I mean, there's a stack of requests in the back of the field.
Reply Quote 0
1 Reply Last reply

delphi 3974

2
Posts

0
Views

Suggested Topics

E

Problem with files
Software Programming • python • • elysha

2

0
Votes

2
Posts

0
Views

S

For:f = open('ab1.txt', 'w') Insert:f = open('ab1.txt', 'a') a - adding data to the filew - complete re-record of the file
A

How is it right to destroy the JSON-Document in Delphi?
Software Programming • json delphi delphi xe5 • • Anderson

2

0
Votes

2
Posts

0
Views

Standard json password is so arranged that during the password, when the method is challenged TJSONObject.ParseJSONValue♪ creates a hierarchy of objects every json field and returns a root object through which access to any field can be obtained.Facilities are inherited from class TJSONAncestor and have properties FOwnedwhich are set at True (including for the original site).When destroying the root object, he checks whether he has the possession of the subsidiary objects and, if any, destroys them:destructor TJSONObject.Destroy; var Member: TJSONAncestor; I: Integer; begin if FMembers <> nil then begin for i := 0 to FMembers.Count - 1 do begin Member := TJSONAncestor(FMembers[I]); if Member.GetOwned then Member.Free; end; FreeAndNil(FMembers); end; inherited Destroy; end; Similarly, subsidiaries, when destroyed, destroy their properties, if any.Thus, it is sufficient for the user to call one original site deconstructor to release all facilities.Please note that in the line:JSONArray := JSONObject.Get(0).JsonValue as TJSONArray; No facility♪ you're just asking for a reference to an object from the original facility ♪ was created during the json-a♪ You can use it until the root object is destroyed. Consequently, no attempt can be made to remove the requested object by hands.
N

problem with a query
Software Programming • php sql phpmyadmin • • nishika

2

0
Votes

2
Posts

0
Views

You could do a search on the board. recibo and if you don't find any row for that user, then just there run the insert.Something like that (I'm inventing field names, I don't know if they're called user_id and date): $id = $_SESSION['id']; $mes = date('m'); $anio = date('Y'); $query = "SELECT * FROM recibo WHERE usuario_id = $id AND YEAR(fecha) = $anio AND MONTH(fecha) = $mes"; $result = mysqli_query($conexion, $query); // si no se encontró nada para ese usuario... if (mysqli_num_rows($result) == 0) { // ... calcular y ejecutar INSERT } Another option could be to use a cronjob on the server, which runs once a month a script to calculate the amounts of all users. Then when a user logs it no longer you need to do the calculation at the same time.On servers you can schedule tasks, in the case of Linux this is done with a command cronjob. Basically it is to indicate the route of a file to run and what date and time should be executed. In your case, it would be a PHP file that monthly generates all inserts in the table recibo.
C

E2010 Incompatible types: 'TStringList' and 'string'
Software Programming • delphi • • chanisef

2

0
Votes

2
Posts

0
Views

A

a page You. String or StringList ?
A

Problem with the show
Software Programming • java serialization • • Avante

2

0
Votes

2
Posts

0
Views

Are you mistaken?"Don't find a class 'rmiclient.Cell'Try to find him:
How to remove the symbols from the line to a certain word?
Software Programming • delphi • • briley

2

0
Votes

2
Posts

0
Views

I'd rewrite that:repeat p:=Pos(edit4.Text, s); // зачем объявлять переменную if p<>0 then Delete (s,1, Pos(edit4.Text, s)); // и не использовать ее??? until p=0; For a preface cycle:p := Pos(edit4.Text, s); while (p <> 0) do begin Delete (s, 1, p - 1); p:=Pos(edit4.Text, s); end; Function Pos returns the first entry of the substructure, or 0 If she's not found anything. Accordingly, in order not to remove the first symbol from the substructure, the index found should be reduced. 1♪Upd: using the function http://www.programm-school.ru/wiki/6_posex-funkciya last := 0; p := PosEx(edit4.Text, s, 1); while (p <> 0) do begin last := p; p := PosEx(edit4.Text, s, p + 1); end; Delete (s, 1, last - 1);
K

Problems with withdrawal
Software Programming • php • • kalena

2

0
Votes

2
Posts

0
Views

G

instead if(@$_GET['design']) write.if(isset($_GET['design'])) There's nothing in your rules RewriteRule about design, and there's no part of the $_GET with the key design.You probably do.if(isset($_GET['id']) && !empty($_GET['id'])) { $id_cab=mysql_real_escape_string($_GET['id']); $sql = "SELECT `top`, `subject` FROM `styles` WHERE `subject`='$id_cab'"; $res = mysql_query($sql); while ($rows = mysql_fetch_array($res)) echo $rows['top']; } But again, don't use mysql, use mysqli or PDO.
Where's the problem with this code?
Software Programming • php 7 • • Mystic

2

0
Votes

2
Posts

0
Views

The mysql_select_db() function has been removed from version 7.0.0File "controls/connection. php<?php // DADOS DA HOSPEDAGEM $endereco = "localhost"; $usuario = "root"; $senha = ""; $banco = "teste"; $link = new mysqli($endereco, $usuario, $senha, $banco); // Check connection if ($link->connect_error) { printf("Conexão falhou: " . $link->connect_error); exit(); } ?> Archive "dashboard. php<?php include("controles/conexao.php"); //BUSCAR USUARIO $buscarusuario = ("SELECT * FROM usuario WHERE estado_usuario = 0 AND vendedor = 1"); //PEGAR QUANTIDADE $result = mysqli_query($link, $buscarusuario); //MOSTRAR QUANTIDADE echo mysqli_num_rows($result); ?>
Problem with subquery
Software Programming • mysql update • • Analeea

2

0
Votes

2
Posts

0
Views

R

What happens is that one of your subqueries, if you run it separately is very sure that it returns you more than 1 record, so when using the "=" comparator jumps the error.In case you are aware that the subquery returns more than 1 value, uses "IN", so that it updates all the records that are within that set of results.set detalle_dulce.categoria IN (select idc from categoria where nombre = 'dulce') If you do not expect more than two records, use a limiter to get one only (in sql server you can use Top(1), in mysql, I am not sure). e.g.:set detalle_dulce.categoria = (select top(1) idc from categoria where nombre = 'dulce') Greetings.
A

Cycle problems for
Software Programming • java android multi point • • Avante

2

0
Votes

2
Posts

0
Views

B

You're consistently starting asynchronous enquiries to the server. 99.9 per cent of the cases are performed longer than the cycle itself.The task of your asynchronous, i.e., the flow of the cycle is excellent, the next irration of the cycle will be performed regardless of the asynchronous process.If you need to perform the tasks consistently, you or you have to do them in the same flow as the cycle or start the next task at the end of the current. There's a sort of "Success" in it, and the next challenge is to start.
E

Doesn't get a Cyrillian into a text file.txt
Software Programming • delphi • • emran

2

0
Votes

2
Posts

0
Views

S

It is possible to see what kind of file code (e.g. Notepad++++), which is transmitted in the first argument and clearly define the type of code in handling the file.For example utf-8 The work will be as follows:... AssignFile(f1, paramstr(1), CP_UTF8); ... Also available Stream to work with files. https://stackoverflow.com/a/14243866/2546083 Unless I'm wrong. setconsolecp and setconsoleoutputcp You work directly with the file.
M

Column equal number of lines in the second table
Software Programming • delphi delphi 7 • • meriah

2

0
Votes

2
Posts

0
Views

J

Who's stopping? Put T*Query in shape, because I don't know what type you're using. Put this component on the same base. And the sign is on this component. Now it's a small thing to write the right sql request.select count(*) from имя_таблицы There's still a T.Query active and everything.
C

Special characters WebService C# SQL X Base Firebird
Software Programming • c sharp delphi web servic languagee asmx firebird 2.5 • • Cleofas

2

0
Votes

2
Posts

0
Views

K

Brian, I believe that the Customer written in Delphi that consumes your WebService is sending you ContentType incorrect, in this case you can contact your customer and ask him to use the text/xml; charset=iso-8859-1.Or you can do one arranjo técnico provisório and modify the ContentType of all requests in your Global.asax:protected void Application_BeginRequest(object sender, EventArgs e) { HttpContext.Current.Request.ContentType = "text/xml; charset=iso-8859-1"; } if it also does not work iso-8859-1, try the UTF-8
C

Delphi (Sender as tObject)
Software Programming • delphi objects sender • • chanisef

2

0
Votes

2
Posts

0
Views

If a mistake in the line with Sender as TSpeedButton, it means Sender is not a copy of TSpeedButton class or his heir. I'll assume.that Sender is a MenuItem or Action object. First, we need to find out the type of facility in the cooler. Second, read the certificate of this class that can be extracted from it.
T

Acceleration of the button in someone else &apos; s Annex
Software Programming • delphi qt • • Trenton

2

0
Votes

2
Posts

0
Views

M

What if it is?1. We're making a squeaky window of someone's application. Through someone's application and canvas.2. Determine where the buttons are, find their coordinates. I don't know what the interface looks like I can't tell you, but the buttons are displayed standardly, they can be captured by shadows.3. Emulsing a mouse button at the right coordinates.

Problem with ADOTable

Suggested Topics

Problem with files Software Programming • python • • elysha

How is it right to destroy the JSON-Document in Delphi? Software Programming • json delphi delphi xe5 • • Anderson

problem with a query Software Programming • php sql phpmyadmin • • nishika

E2010 Incompatible types: 'TStringList' and 'string' Software Programming • delphi • • chanisef

Problem with the show Software Programming • java serialization • • Avante

How to remove the symbols from the line to a certain word? Software Programming • delphi • • briley

Problems with withdrawal Software Programming • php • • kalena

Where's the problem with this code? Software Programming • php 7 • • Mystic

Problem with subquery Software Programming • mysql update • • Analeea

Cycle problems for Software Programming • java android multi point • • Avante

Doesn't get a Cyrillian into a text file.txt Software Programming • delphi • • emran

Column equal number of lines in the second table Software Programming • delphi delphi 7 • • meriah

Special characters WebService C# SQL X Base Firebird Software Programming • c sharp delphi web servic languagee asmx firebird 2.5 • • Cleofas

Delphi (Sender as tObject) Software Programming • delphi objects sender • • chanisef

Acceleration of the button in someone else &amp;apos; s Annex Software Programming • delphi qt • • Trenton

Problem with files
Software Programming • python • • elysha

How is it right to destroy the JSON-Document in Delphi?
Software Programming • json delphi delphi xe5 • • Anderson

problem with a query
Software Programming • php sql phpmyadmin • • nishika

E2010 Incompatible types: 'TStringList' and 'string'
Software Programming • delphi • • chanisef

Problem with the show
Software Programming • java serialization • • Avante

How to remove the symbols from the line to a certain word?
Software Programming • delphi • • briley

Problems with withdrawal
Software Programming • php • • kalena

Where's the problem with this code?
Software Programming • php 7 • • Mystic

Problem with subquery
Software Programming • mysql update • • Analeea

Cycle problems for
Software Programming • java android multi point • • Avante

Doesn't get a Cyrillian into a text file.txt
Software Programming • delphi • • emran

Column equal number of lines in the second table
Software Programming • delphi delphi 7 • • meriah

Special characters WebService C# SQL X Base Firebird
Software Programming • c sharp delphi web servic languagee asmx firebird 2.5 • • Cleofas

Delphi (Sender as tObject)
Software Programming • delphi objects sender • • chanisef

Acceleration of the button in someone else ' s Annex
Software Programming • delphi qt • • Trenton