| |

VerySource

 Forgot password?
 Register
Search
View: 12|Reply: 4

Little girl asking for help !!!!!! Dynamically create qrlabel problems, wait online ... urgent !!!

[Copy link]

1

Threads

1

Posts

2

Credits

Newbie

Rank: 1

Credits
2

 China

Post time: 2020-2-22 14:00:01
| Show all posts |Read mode
I want to dynamically create qrlabel in quickrep, but it always makes mistakes, why ??
code show as below:
procedure TARPD00.QRBand4BeforePrint (Sender: TQRCustomBand;
  var PrintBand: Boolean);
var qrlabel: TQRLabel;
    i: integer;
begin
 for i: = 1 to 23 do
  begin
   if strtofloat (temp [i] [3])> 0 then
    begin
     qrlabel: = TQRLabel.Create (self);
     qrlabel.Parent: = ARPD00.QRBand4;
     qrlabel.Left: = 0;
     qrlabel.Top:=count;
     qrlabel.Height: = 17;
     qrlabel.AutoSize: = true;
     qrlabel.Caption: = temp [i] [2] + '' + temp [i] [3];
     count: = count + 20;
    end;
  end;
end;
Reply

Use magic Report

0

Threads

17

Posts

18

Credits

Newbie

Rank: 1

Credits
18

 China

Post time: 2020-5-6 20:15:01
| Show all posts
Can't see the problem, missing reference unit?
Reply

Use magic Report

0

Threads

3

Posts

4

Credits

Newbie

Rank: 1

Credits
4

 China

Post time: 2020-5-20 10:15:02
| Show all posts
qrlabel: = TQRLabel.Create (self);

Did the program finally release qrlabel?
Reply

Use magic Report

0

Threads

3

Posts

4

Credits

Newbie

Rank: 1

Credits
4

 Invalid IP Address

Post time: 2020-5-27 10:45:01
| Show all posts
QR label.free;
Reply

Use magic Report

0

Threads

10

Posts

6

Credits

Newbie

Rank: 1

Credits
6

 China

Post time: Yesterday 14:30
| Show all posts
Post error tips
Reply

Use magic Report

You have to log in before you can reply Login | Register

Points Rules

Contact us|Archive|Mobile|CopyRight © 2008-2020|verysource.com ( 京ICP备17048824号-1 )

Quick Reply To Top Return to the list