Results 1 to 5 of 5

Thread: Component met TStringGrid geeft verkeerde resultaten

  1. #1

    Component met TStringGrid geeft verkeerde resultaten

    Hallo allemaal,

    Code:
    TGrid = CLASS(TStringGrid)
    PRIVATE
      ...
    PROTECTED
    PUBLIC
      PROCEDURE Paint; OVERRIDE;
    PUBLISHED
    END;
    
    PROCEDURE Register;
    
    IMPLEMENTATION
    
    ...
    
    PROCEDURE TGrid.Paint;
    BEGIN
      ColCount := 1;
      RowCount :=10;
      INHERITED Paint;
    END;
    
    ...
    Waarom laat grid vijf cellen zien terwijl ColCount := 1?
    Wat gaat hier fout?

    Met een vriendelijk groet, Frans

  2. #2
    Dat lijkt me nou typisch iets wat je niet in Paint doet eerlijk gezegd.

    Wat wil je eigenlijk precies bereiken, een grid met altijd 1 kolom en 10 rijen?
    Dan kun je denk ik beter SetRowCount en SetColCount overriden (en Columns op een of andere manier disabelen).
    Kijk eens naar TValueListEditor, die heeft altijd precies 2 kolommen.

    Bart
    Last edited by Bart B; 03-Jan-22 at 19:15. Reason: typo

  3. #3
    Bart, bedankt. Probleem opgelost. Oplossing staat op het Forum. Zoeken naar : SetColCount.

    H.G. Frans

  4. #4
    Member Duiker's Avatar
    Join Date
    May 2020
    Location
    Hamont-Achel (Belgie), Pattaya (Thailand)
    Posts
    55
    Misschien even een exacte verwijzing naar waar je het antwoord hebt gevonden?

  5. #5
    Ik verontschuldig mij op voorhand daar ik niet TS ben, maar ik gok op deze post
    Iedereen wist dat het onmogelijk was. Behalve dan die ene dwaas die dat niet helemaal goed had begrepen en het toch deed.

Thread Information

Users Browsing this Thread

There are currently 1 users browsing this thread. (0 members and 1 guests)

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •