delphi - How do I associate a record with a TListBox item? -


I have a record type, I want to add that record type variable to TListbox and retrieve it on click event of TListbox Want to do Is this possible? If yes then how?

I've added it using 

  lstbox.AddItem (data, Myrek);

This is an error of incompatible types of data and the Myreck is the variable of MyRecord that I have created

to add: 

 < Code> new (fptr1); ZeroMemory (fptr1, sizeof (fptr1 ^)); Fptr1 ^: = fptr ^; LstboxLeft.AddItem (path, TObject (fptr1));

To retrieve: 

  fptr: = PData (lstboxLeft.Items [lstboxLeft.ItemIndex]); Additem takes one tobject as the second parameter and one record is not an object

You can either create your own record instead of an object (usually the best solution), or put the record into an object.

Here's an example using the record: 

  type PMIRC = ^ TMyRec; TMyRec = Record I: Integer; End; Process TForm1.FormCreate (Sender: TObject); Var P: PMIRAC; New (P) start; P. I: = 42; ListBox1.AddItem ('A', TOBject (P)); End; Process TForm1.FormDestroy (Sender: Tubect); Var I: integer; Get started: Free memory for ListBox 1 from I: = 0 Setting Items.Count - 1 (PMIECC (List item 1. Item object [i]); End; Process TForm1.ListBox1Click (Sender: Tubbed); Var P: PMIRAC; Start P: = PMIRECE (Listblock 1. Items.Obsites [List Box 1. ITM Index]); Show message (intositor (PI)); End;

-

Comments

Post a Comment

Popular posts from this blog

Eclipse CDT variable colors in editor -

I hope this is a good question to ask here. This programming is related, so I thought it would be better than the superuser, so I am using the CDT C ++ Eclipse plugin. I know how the editor changes colors for some things But is there a way to do that all the variables are different colors? For example in KDEValue, it sets the local variables and square variables in different colors and bold square squares. Can I copy it to CDT? Eclips provides some level of color customization for text editor syntax You can see it on the following: There are many elements, including the Window> Preferences> C / C ++> Editor> Syntax color code that can be changed, assembly, Comments, Preprocessor and Doxian Under the code, it is possible to change the color of some variable types, such as global variables, local variable announcements, local variable references, and parameter variables. But I do not think the code is capable of changing the color of each variable declared....
Read more

AJAX doesn't send POST query -

$ (दस्तावेज़) .ready (function () {function ajaxselectrss (rssurlvar) {var ajaxRequest; // वेरिएबल जो अजाक्स को संभव बनाता है! कोशिश करें कि {// ओपेरा 8.0+, फ़ायरफ़ॉक्स, सफारी अजाक्स अनुरोध} = नया एक्सएमएलएचटीपीआरइवेस्ट ();} कैच (ई) {// इंटरनेट एक्सप्लोरर ब्राउज़र्स {ajaxRequest = new ActiveXObject ("Msxml2.XMLHTTP");} पकड़ो (ई) {try {ajaxRequest = new ActiveXObject ("Microsoft.XMLHTTP");} कैच (ई) {// कुछ गलत चेतावनी ("आपका ब्राउज़र तोड़ दिया!"); वापसी झूठी;}}} // एक बनाएं फ़ंक्शन जो सर्वर से भेजे गए डेटा प्राप्त करेंगे ajaxRequest.onreadystatechange = function () {if (ajaxRequest.readyState == 4) {var ajaxDisplay = document.getElementById ('news'); ajaxDisplay.innerHTML = ajaxRequest.responseText;}} / / Var rssurlvar = $ (this) .attr ("title"); var queryString = "rurl =" + rssurlvar; var urltofile = "rssget.php"; ajaxRequest.open ("पोस्ट", urltofile, सच); ajaxRequ Est.setRequestHeader ("सामग्री-प्र...
Read more

wpf - Custom Message Box Advice -

Well, I'm using a custom window box that comes with some custom control boxes that accompany the text The producers who are displayed are called. I have a defined event, which has been subscribed through the original class, it gets burnt when clicking on the button. However, I can not see how to use it effectively, I would like to return one yes, whether yes or not, but obviously my code will continue to execute, so this Below is some example code to clarify the problem that the method has subscibed by clicking on the button. Message box window Public partial class custom message box: window {public representative message messagebox object sender, event events e); Public event messagebox handler messagebox document; Public Customs Box () {Initial group (); } Public Customsbox (String Message) {InitializeComponent (); This.txtdescription.Text = Message; } Public Customsbox (String Message, String Title, String First BTNtext) {Initialization (); This.lbltitle.Content =...
Read more