Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi stringrid berechnen bei '' sperren (https://www.delphipraxis.net/41246-stringrid-berechnen-bei-sperren.html)

mr.floppy81 28. Feb 2005 16:09


stringrid berechnen bei '' sperren
 
Moin,

hatte schoneinmal so ein ähnliches Prob komme aber trotzdem nicht weiter.

Als ich fülle ein stringgrid. Wenn ich eine zelle des Stringgrids aussuche mit selectcell soll die letzte spalte des stringgrids berechnet werden.
Wie kann ich das ereichen, dass wenn '' also nichts eingegeben wird nicht die Fehlermeldung erscheint " '' ist kein gültiger Gleitkommawert"?

Habe schon while not und if then probiert aber die schleifen machen das net :( .
LG Andreas

Khabarakh 28. Feb 2005 16:20

Re: stringrid berechnen bei '' sperren
 
Delphi-Quellcode:
procedure TForm1.StringGrid1SelectCell(Sender: TObject; ACol,
  ARow: Integer; var CanSelect: Boolean);
var Value: Single; Code: Integer;
begin
  if StringGrid1.Cells[ACol,ARow]='' then         //1. Möglichkeit;
    Exit;


  try                                             //2.
    Value:=StrToFloat(StringGrid1.Cells[ACol,ARow]);
  except
    Exit;
  end;


  Val(StringGrid1.Cells[ACol,ARow],Value,Code);    //3.
  if Code<>0 then
    Exit;
end;
Oder bei Integer auch Delphi-Referenz durchsuchenStrToIntDef


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:31 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz