Help with a MINIATURE issue on Lazarus Pascal - just a few lines
$30 USD
Igangværende
Slået op over 11 år siden
$30 USD
Betales ved levering
KEY OBJECTIVE: I want to show a form as a modal form but at a certain location in relation to another object on the form.
First, I have only listed Delphi since it's the closest available. But my REAL requirement is for LAZARUS PASCAL. So if your solution is not going to work with Lazarus, I'm not interested.
This is a very small TASK and not a whole project.
The scenario:
I am coding a Lazarus application. There's a form with a textbox and next to it is a command button. I'm trying to 'simulate' a drop down box using another form. i.e., when the command button is clicked, I want the new form to appear just below the textbox. The new form will be modal and has no borders. So until its own button is clicked to close, it should remain on top.
Now, I've done most of this. I even got the child form to appear. However, the moment it comes up, it's not active. It's not clickable. And the whole application seems frozen. So I jsut click the STOP button on the IDE to terminate.
Here's my code this far:
procedure [login to view URL](Sender: TObject);
var
Res : Integer;
frmPopUp : TForm;
begin
frmPopUp := [login to view URL](nil);
[login to view URL] := Self;
[login to view URL]:= [login to view URL] + [login to view URL] +
[login to view URL] + [login to view URL] + 3;
[login to view URL]:= [login to view URL] + [login to view URL] + [login to view URL];
Res := [login to view URL];
end;
NOTE: 'rm' is a Panel and EditItemCat is a TabSheet.
The requirement:
You must only make this work correctly. There's no need to do any functionality on the form, DB, etc. I just want the child form to appear as modal and it must be usable (that means not frozen like now). And this MUST work with LAZARUS.
PLEASE DON'T SEND ME FULL RESUMES. I JUST WANT THE JOB DONE! No need for exe files. You cannot use any 3rd party plug-ins or tools. It's pure Lazarus.
Please clarify any issues carefully.
Thank you!