diff --git a/meteoutil.pas b/meteoutil.pas new file mode 100644 index 0000000..3064015 --- /dev/null +++ b/meteoutil.pas @@ -0,0 +1,103 @@ +unit meteoutil; + +{$mode ObjFPC}{$H+} + +interface + + + +uses + Classes, SysUtils, fpjson, jsonparser; + + +function calcolaprecipitazione (oggettoJSON:TJSONObject; ora:integer):string; +function FormattaAstroLinea(linea:string):string; +function MeseToText(mese:integer):string; +function stringarichiesta(https:boolean; lat, long: double):string; + +implementation + + + function calcolaprecipitazione (oggettoJSON:TJSONObject; ora:integer):string; + var + codice:integer; + precipitazione:string; + begin + + codice:=oggettoJSON.FindPath('hourly.weather_code['+inttostr(ora)+']').AsInteger; + + case codice of + 0: precipitazione:= 'Sereno'; + 1: precipitazione:= 'Prev. Sereno'; + 2: precipitazione:= 'Parz. Nuvoloso'; + 3: precipitazione:= 'Nuvoloso'; + 45..48: precipitazione:= 'Nebbia'; + 51..57: precipitazione:= 'Pioviggine'; + 61..65: precipitazione:= 'Pioggia'; + 66..67:precipitazione:= 'Grandine'; + 71..77: precipitazione:= 'Neve'; + 80..82: precipitazione:= 'Rovesci'; + 85..86:precipitazione:= 'Neve'; + 95..99:precipitazione:= 'Temporale'; + end; + + result:=precipitazione; + + + end; + + + +function FormattaAstroLinea(linea:string):string; +var +mese:string; +begin + + mese:=MeseToText(strtoint(copy(linea, 1,2))); + result:=copy(linea, 5, 2)+' '+copy(mese, 1, 3)+' ' +copy(linea, 16); + + + +end; + + +function MeseToText(mese:integer):string; +begin + case mese of + 1: result:='Gennaio'; + 2: result:='Febbraio'; + 3: result:='Marzo'; + 4: result:='Aprile'; + 5: result:='Maggio'; + 6: result:='Giugno'; + 7: result:='Luglio'; + 8: result:='Agosto'; + 9: result:='Settembre'; + 10: result:='Ottobre'; + 11: result:='Novembre'; + 12: result:='Dicembre'; + + end; + + +end; + + +function stringarichiesta(https:boolean; lat, long: double):string; +var +segnaposto:string; +defaultseparator:char; +begin + if https then segnaposto:='https://' else segnaposto:='http://'; + defaultseparator:=DefaultFormatSettings.DecimalSeparator; + DefaultFormatSettings.DecimalSeparator:='.'; //fa in modo che venga usato il punto nelle conversioni e non la virgola viene usato il punto e la virgola in base alla provenienza dell'utente di solito + //per la richiesta serve che rappresentiamo con i punti + segnaposto:=segnaposto+'api.open-meteo.com/v1/forecast?latitude='+floattostr(lat)+'&longitude='+floattostr(long)+'&hourly=weather_code,temperature_2m,wind_speed_10m,wind_speed_180m,visibility,cloud_cover'; + DefaultFormatSettings.DecimalSeparator:=defaultseparator; //rimette il separatore a quello di default + result:=segnaposto; + +end; + + +end. + diff --git a/starstreetapp.ico b/starstreetapp.ico new file mode 100644 index 0000000..fd2e1f0 Binary files /dev/null and b/starstreetapp.ico differ diff --git a/starstreetapp_icona.ico b/starstreetapp_icona.ico new file mode 100644 index 0000000..fd2e1f0 Binary files /dev/null and b/starstreetapp_icona.ico differ diff --git a/unit1.lfm b/unit1.lfm new file mode 100644 index 0000000..e54647a --- /dev/null +++ b/unit1.lfm @@ -0,0 +1,1416 @@ +object Form1: TForm1 + Left = 450 + Height = 850 + Top = 250 + Width = 1330 + Caption = 'StarStreet App 0.0.2 Qt6' + ClientHeight = 850 + ClientWidth = 1330 + Color = 2039583 + Constraints.MinHeight = 850 + Constraints.MinWidth = 1330 + Font.Height = -16 + Font.Name = 'Noto Sans' + KeyPreview = True + Menu = MenuGlobale + Position = poDesktopCenter + ShowHint = True + LCLVersion = '4.6.0.0' + OnCreate = FormCreate + OnResize = FormResize + object BarraStrumenti: TPanel + AnchorSideLeft.Control = Owner + AnchorSideTop.Control = Owner + AnchorSideTop.Side = asrCenter + AnchorSideRight.Control = Owner + AnchorSideRight.Side = asrBottom + Left = 0 + Height = 40 + Top = 405 + Width = 1330 + Anchors = [akTop, akLeft, akRight] + BevelOuter = bvNone + ChildSizing.TopBottomSpacing = 10 + ChildSizing.EnlargeHorizontal = crsHomogenousSpaceResize + ChildSizing.EnlargeVertical = crsHomogenousSpaceResize + ChildSizing.ShrinkHorizontal = crsHomogenousSpaceResize + ChildSizing.ShrinkVertical = crsHomogenousSpaceResize + ChildSizing.ControlsPerLine = 3 + ClientHeight = 40 + ClientWidth = 1330 + ParentBackground = False + TabOrder = 0 + object avanti: TSpeedButton + AnchorSideLeft.Control = DateEdit1 + AnchorSideLeft.Side = asrBottom + AnchorSideTop.Control = DateEdit1 + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 759 + Height = 34 + Hint = '+1 Giorno' + Top = 3 + Width = 35 + Anchors = [akTop, akLeft, akBottom] + BorderSpacing.Left = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF1D0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF5A3316FF9A0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF5A3316FFFF3316FF6B0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003316FF5A3316FFFF3316FFFF3316FF600000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF5A3316FFFF3316FFFF3316FFFF3316FF600000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF5A3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF600000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF5A3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF5F0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003316FF5A3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF600000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF600000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF840000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF600000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF9F00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF9F000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF5A3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF9F000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF5A3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF9F0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003316FF5A3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF9F00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316 + FF9F000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF5A3316FFFF3316FFFF3316FF9F000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF5A3316FFFF3316FF9F0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003316FF5A3316FF9F00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF1D000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = avantiClick + end + object indietro: TSpeedButton + AnchorSideTop.Control = DateEdit1 + AnchorSideRight.Control = DateEdit1 + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 536 + Height = 34 + Hint = '-1 Giorno' + Top = 3 + Width = 35 + Anchors = [akTop, akRight, akBottom] + BorderSpacing.Right = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF1D000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9A3316FF5A00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF6B3316FFFF3316FF5A0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF603316FFFF3316FFFF3316FF5A000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF603316FFFF3316 + FFFF3316FFFF3316FF5A00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF603316FFFF3316FFFF3316FFFF3316 + FFFF3316FF5A0000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF5F3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF5A000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF603316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF603316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF843316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF603316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF5A0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FF5A000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF5A00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FF5A0000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF5A000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FFFF3316FF5A000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FFFF3316FF5A00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FFFF3316FF5A0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF9F3316FF5A000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF1D00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = indietroClick + end + object indietroveloce: TSpeedButton + AnchorSideTop.Control = DateEdit1 + AnchorSideRight.Control = indietro + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 496 + Height = 34 + Hint = '-5 Giorni' + Top = 3 + Width = 35 + Anchors = [akTop, akRight, akBottom] + BorderSpacing.Right = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF1D000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF1D00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF9A3316FF5A0000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF9A3316FF5A0000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF6B3316FFFF3316FF5A000000000000 + 000000000000000000000000000000000000000000003316FF6B3316FFFF3316 + FF5A000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF603316FFFF3316FFFF3316FF5A00000000000000000000 + 00000000000000000000000000003316FF603316FFFF3316FFFF3316FF5A0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF603316FFFF3316FFFF3316FFFF3316FF5A0000000000000000000000000000 + 0000000000003316FF603316FFFF3316FFFF3316FFFF3316FF5A000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF603316FFFF3316 + FFFF3316FFFF3316FFFF3316FF5A000000000000000000000000000000003316 + FF603316FFFF3316FFFF3316FFFF3316FFFF3316FF5A00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF5F3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF5A0000000000000000000000003316FF5F3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF5A0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF603316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FF5A00000000000000003316FF603316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FF5A000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF603316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF5A000000003316FF603316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF5A00000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF843316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A3316 + FF843316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FF5A0000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF603316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF983316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF5A000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A3316FF9F3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF5A000000003316FF9F3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FF5A00000000000000003316FF9F3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF5A00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF5A0000000000000000000000003316FF9F3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF5A0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FFFF3316 + FFFF3316FF5A000000000000000000000000000000003316FF9F3316FFFF3316 + FFFF3316FFFF3316FFFF3316FF5A000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FFFF3316 + FF5A00000000000000000000000000000000000000003316FF9F3316FFFF3316 + FFFF3316FFFF3316FF5A00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FFFF3316FF5A0000 + 000000000000000000000000000000000000000000003316FF9F3316FFFF3316 + FFFF3316FF5A0000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FFFF3316FF5A000000000000 + 000000000000000000000000000000000000000000003316FF9F3316FFFF3316 + FF5A000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF9F3316FF5A00000000000000000000 + 000000000000000000000000000000000000000000003316FF9F3316FF5A0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF1D0000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF1D000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = indietroveloceClick + end + object avantiveloce: TSpeedButton + AnchorSideLeft.Control = avanti + AnchorSideLeft.Side = asrBottom + AnchorSideTop.Control = DateEdit1 + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 799 + Height = 34 + Hint = '+5 Giorni' + Top = 3 + Width = 35 + Anchors = [akTop, akLeft, akBottom] + BorderSpacing.Left = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF1D000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF1D00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF5A3316 + FF9A000000000000000000000000000000000000000000000000000000000000 + 00003316FF5A3316FF9A00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF5A3316FFFF3316 + FF6B000000000000000000000000000000000000000000000000000000003316 + FF5A3316FFFF3316FF6B00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003316FF5A3316FFFF3316FFFF3316 + FF600000000000000000000000000000000000000000000000003316FF5A3316 + FFFF3316FFFF3316FF6000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316 + FF6000000000000000000000000000000000000000003316FF5A3316FFFF3316 + FFFF3316FFFF3316FF6000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF60000000000000000000000000000000003316FF5A3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF6000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF5F0000000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF5F00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF6000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF6000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF60000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF6000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF5A3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF843316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF8400000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF5A3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF983316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF6000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003316FF5A3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF9F3316FF5A3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF9F000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF9F000000003316FF5A3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FF9F000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF9F00000000000000003316FF5A3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FF9F0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF9F0000000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FF9F00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316FF9F000000000000 + 000000000000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FFFF3316 + FF9F000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF5A3316FFFF3316FFFF3316FFFF3316FF9F0000000000000000000000000000 + 0000000000003316FF5A3316FFFF3316FFFF3316FFFF3316FF9F000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF5A3316 + FFFF3316FFFF3316FF9F00000000000000000000000000000000000000000000 + 00003316FF5A3316FFFF3316FFFF3316FF9F0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF5A3316FFFF3316 + FF9F000000000000000000000000000000000000000000000000000000003316 + FF5A3316FFFF3316FF9F00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003316FF5A3316FF9F000000000000 + 00000000000000000000000000000000000000000000000000003316FF5A3316 + FF9F000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF1D0000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF1D000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = avantiveloceClick + end + object tempooggi: TSpeedButton + AnchorSideTop.Control = DateEdit1 + AnchorSideRight.Control = indietroveloce + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 456 + Height = 34 + Hint = 'Torna al giorno attuale' + Top = 3 + Width = 35 + Anchors = [akTop, akRight, akBottom] + BorderSpacing.Right = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF033316FF063316FF063316FF063316FF063316FF063316 + FF063316FF063316FF063316FF063316FF063316FF063316FF063316FF063316 + FF043316FF010000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF023316FF2C3316FF673316FF703316FF703316FF703316FF703316FF703316 + FF703316FF703316FF703316FF703316FF703316FF703316FF6F3316FF423316 + FF08000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF1D3316FF8B3316FFEC3316FFF73316FFF83316FFF83316FFF83316FFF83316 + FFF83316FFF83316FFF83316FFF83316FFF33316FFBE3316FF383316FF020000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF013316 + FF163316FF803316FFF23316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFB3316FFC13316FF2D3316FF0300000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF013316 + FF0E3316FF853316FFEE3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFC3316FFC33316FF393316FF01000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF013316 + FF193316FF853316FFF33316FFFF3316FFFF3316FFFF3316FFFA3316FFC23316 + FF3C3316FF040000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF013316 + FF113316FF803316FFF33316FFFF3316FFFC3316FFC23316FF2C3316FF020000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF013316 + FF133316FF8B3316FFEE3316FFC33316FF3D3316FF0200000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003316FF013316 + FF203316FF7E3316FF373316FF04000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF013316FF133316 + FF5A3316FF133316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF013316FF183316FF953316FFE13316 + FF823316FF123316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF013316FF183316FF963316FFF03316FFFD3316FFEA3316 + FF693316FF0F3316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF013316FF183316FF963316FFF03316FFFE3316FFFF3316FFFE3316FFE73316 + FF693316FF0F3316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF013316FF183316 + FF963316FFF03316FFFE3316FFFF3316FFFF3316FFFF3316FFFE3316FFE73316 + FF683316FF0F3316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003316FF013316FF183316FF963316FFF03316 + FFFE3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFE3316FFE73316 + FF693316FF0F3316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003316FF013316FF183316FF963316FFF03316FFFE3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFE3316FFE73316 + FF693316FF0F3316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003316 + FF013316FF183316FF963316FFF03316FFFE3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFE3316FFE73316 + FF693316FF103316FF0100000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003316FF013316FF183316 + FF963316FFF03316FFFE3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316 + FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFF3316FFFE3316FFE83316 + FF713316FF143316FF0100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003316FF0E3316FF883316FFE23316 + FFF13316FFF13316FFF13316FFF13316FFF13316FFF13316FFF13316FFF13316 + FFF13316FFF13316FFF13316FFF13316FFF13316FFF13316FFF03316FFDE3316 + FF843316FF0D0000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF023316FF1B3316FF543316FF603316FF603316 + FF603316FF603316FF603316FF603316FF603316FF603316FF603316FF603316 + FF603316FF603316FF603316FF603316FF603316FF603316FF603316FF533316 + FF1B3316FF020000000000000000000000000000000000000000000000000000 + 000000000000000000003316FF033316FF073316FF083316FF083316FF083316 + FF083316FF083316FF083316FF083316FF083316FF083316FF083316FF083316 + FF083316FF083316FF083316FF083316FF083316FF083316FF073316FF030000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = tempooggiClick + end + object impostazionibutton: TSpeedButton + AnchorSideLeft.Control = EventiListButton + AnchorSideLeft.Side = asrBottom + AnchorSideTop.Control = DateEdit1 + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 879 + Height = 34 + Hint = 'Impostazioni' + Top = 3 + Width = 35 + Anchors = [akTop, akLeft, akBottom] + BorderSpacing.Left = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000008A8ADE103E3EFF208D8DE0100000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FF9F3E3EFFFF3E3EFFFF3E3EFFFF3E3EFF9F0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFF303E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFF300000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FF103E3EFFAF3E3EFFBF3E3EFF50000000003E3EFF403E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF40000000003E3EFF503E3EFFBF3E3EFFAF3E3E + FF10000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFF103E3EFFCF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF603E3EFF403E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFF403E3EFF603E3EFFFF3E3EFFFF3E3EFFFF3E3EFFCF3E3E + FF10000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003E3EFFAF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFCF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFCF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFAF0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003E3EFFBF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3D3DFEFF3B3BFDFF3A3AFDFF3B3BFDFF3D3DFEFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFBF000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFF503E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3939FCFF3636FAFF3636FAFF3636FAFF3636FAFF3636FAFF3939FCFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFF5000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFF603E3EFFFF3E3EFFFF3E3EFFFF3838FBFF3636 + FAFF3636FAFF3636FAFF3737FAE63636FAFF3636FAFF3636FAFF3838FBFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF60000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FF303E3EFF403E3EFF403E3EFFCF3E3EFFFF3939FCFF3636FAFF3636FAFF3636 + FA803636FA10000000003636FA103636FA803636FAFF3636FAFF3939FCFF3E3E + FFFF3E3EFFCF3E3EFF403E3EFF403E3EFF300000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFF9F3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3D3DFEFF3636FAFF3636FAFF3636FA80000000000000 + 00000000000000000000000000003636FA803636FAFF3636FAFF3D3DFEFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFF9F0000000000000000000000000000 + 00000000000000000000000000008989DD103E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3B3BFDFF3636FAFF3636FAFF3636FA1000000000000000000000 + 000000000000000000003636FA103636FAFF3636FAFF3B3BFDFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF8B8BDF100000000000000000000000000000 + 000000000000000000003E3EFF203E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3A3AFDFF3636FAFF3636FAE6000000000000000000000000000000000000 + 000000000000000000003636FAE63636FAFF3A3AFDFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF20000000000000000000000000000000000000 + 0000000000008989DD103E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3B3B + FDFF3636FAFF3636FAFF3636FA10000000000000000000000000000000000000 + 00003636FA103636FAFF3636FAFF3B3BFDFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF8B8BDF1000000000000000000000000000000000000000000000 + 0000000000003E3EFF9F3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3D3DFEFF3636 + FAFF3636FAFF3636FA8000000000000000000000000000000000000000003636 + FA803636FAFF3636FAFF3D3DFEFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FF9F000000000000000000000000000000000000000000000000000000000000 + 0000000000003E3EFF303E3EFF403E3EFF403E3EFFCF3E3EFFFF3939FCFF3636 + FAFF3636FAFF3636FA803636FA10000000003636FA103636FA803636FAFF3636 + FAFF3939FCFF3E3EFFFF3E3EFFCF3E3EFF403E3EFF403E3EFF30000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFF603E3EFFFF3E3EFFFF3E3EFFFF3838FBFF3636 + FAFF3636FAFF3636FAFF3737FAE63636FAFF3636FAFF3636FAFF3838FBFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF60000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003E3EFF503E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3939FCFF3636 + FAFF3636FAFF3636FAFF3636FAFF3636FAFF3939FCFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF50000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FFBF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3D3DFEFF3B3B + FDFF3A3AFDFF3B3BFDFF3D3DFEFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFBF00000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003E3EFFAF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFCF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFCF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFAF0000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFF103E3EFFCF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFF603E3EFF403E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFF403E3EFF603E3EFFFF3E3EFFFF3E3EFFFF3E3EFFCF3E3E + FF10000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFF103E3EFFAF3E3E + FFBF3E3EFF50000000003E3EFF403E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFF40000000003E3EFF503E3EFFBF3E3EFFAF3E3EFF10000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003E3EFF303E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FF30000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003E3EFF9F3E3EFFFF3E3EFFFF3E3EFFFF4B4BFFA4000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000008989DD103E3EFF208B8BDF100000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = impostazionibuttonClick + end + object InfoButton: TSpeedButton + AnchorSideLeft.Side = asrBottom + AnchorSideTop.Control = DateEdit1 + AnchorSideRight.Control = tempooggi + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 416 + Height = 34 + Hint = 'Riguardo StarStreet Forecast' + Top = 3 + Width = 35 + Anchors = [akTop, akRight, akBottom] + BorderSpacing.Left = 5 + BorderSpacing.Right = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000D80100000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000855BAD01B4757D03492BAC1B311D + B12F2B14B13F2D19B2343F26AF206A41A50AA067930100000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000004626B3063E20BE202613C4651206D1AC0904DCD10703E0D90702 + E2DE0703E0DB0804DDD21006D4B62110C876351CC12D4324BA0A000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000623BA5024024 + B6172714CB611005D7C20502E2ED0100E3FB0000DFFF0000DEFF0000DDFF0000 + DDFF0000DEFF0100E2FC0401E3F20B03DAD12411CE77341DBA21A2679C010000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000005831AE03331BC0281C0CD0900702 + E0E80000E2FD0000DCFF0000D7FF0000D5FF0000D4FF0000D4FF0000D4FF0000 + D4FF0000D6FF0000DBFF0000E2FE0101E0FA1A0AD5AE321ABB357A4FAC020000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000005F38AE02341BC326190AD3990501E1F30000E0FF0000 + D7FF1212D4FF3B3BD4FF4949D5FF4949D5FF4949D5FF4848D5FF3C3DD4FF1C1D + D2FF0000D3FF0000D6FF0000DDFF0100E4FD1607D7BA2E18C03A5E37A8030000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00005230AC01341CBF151E0DD17C0702E0E90000DEFF0000D6FF0000D2FF4949 + D5FFB6B6E8FFDDDDF3FFDDDDF4FFDDDDF4FFDADAF2FFBBBDE4FF6668CFFF0003 + D0FF0000D2FF0000D4FF0000DCFF0301E3F51708D8A2351BBB256744A5010000 + 0000000000000000000000000000000000000000000000000000000000003D1F + B8052813CB460E04DDCC0100DFFD0000D6FF0000D2FF0000D2FF5252D6FFCCCC + EDFFF8F8F9FFFEFEFEFFFFFFFFFFFDFDFDFFDEE0EAFF7C7FC9FF0008CDFF0000 + D2FF0000D2FF0000D4FF0000DDFE0802E1E41F0ED06E4227AD0C000000000000 + 0000000000000000000000000000000000000000000000000000341CC512190A + D4880501E1F30000DBFF0000D3FF0000D2FF0000D2FF3A3AD4FF9596D7FFBABB + D6FFF7F7F9FFFFFFFFFFEEEEF1FFB9BCD3FF6367C3FF0006CDFF0000D2FF0000 + D2FF0000D2FF0000D7FF0201E1F81307DAB03019C02B00000000000000000000 + 0000000000000000000000000000000000003520B4022815C62C1106DDB80000 + E0FF0000D6FF0000D2FF0000D2FF0000D2FF0000D2FF0006CCFF3F42C7FFEFEF + F8FFFFFFFFFFD3D4E1FF545AB9FF010CC8FF0001D1FF0000D2FF0000D2FF0000 + D2FF0000D4FF0000DCFE0A03DFD82612D14F502BAA0500000000000000000000 + 00000000000000000000000000003C28BC032011CA470D04DED50000DEFF0000 + D4FF0000D2FF0000D2FF0000D2FF0000D2FF0000D2FF3F3FD4FFEFEFF9FFFFFF + FFFFD4D4E5FF585AC7FF0000D1FF0000D2FF0000D2FF0000D2FF0000D2FF0000 + D3FF0000DAFF0602E1E71D0DD371311BB00D0000000000000000000000000000 + 00000000000000000000482DC2042312CF560D04DEE40000DCFF0000D3FF0000 + D2FF0000D2FF0000D2FF0000D2FF0000D2FF3F3FD4FFEFEFF9FFFFFFFFFFD4D5 + E5FF595CC7FF0000D1FF0000D2FF0000D2FF0000D2FF0000D2FF0000D2FF0000 + D9FF0502E2EC180BD3812F21B212000000000000000000000000000000000000 + 0000000000004C2CC3042512D0590E04DDE70000DBFF0000D3FF0000D2FF0000 + D2FF0000D2FF0000D2FF4646D5FF8384DCFFF3F3FBFFFFFFFFFFD4D5E4FF5A5C + C6FF0000D1FF0000D2FF0000D2FF0000D2FF0000D2FF0000D2FF0000D8FF0401 + E2ED160AD2833226B21300000000000000000000000000000000000000000000 + 0000412DC2041E10CE550903DEE30000DCFF0000D3FF0000D2FF0000D2FF0000 + D2FF0000D2FF8181DDFFD9D9F1FFFCFCFEFFFFFFFFFFD4D5E4FF5A5CC6FF0000 + D1FF0000D2FF0000D2FF0000D2FF0000D2FF0000D3FF0000D9FF0602E2EC1A0C + D2812C1BB1120000000000000000000000000000000000000000000000002C1B + B6032110C5400F05DECD0000DFFF0000D4FF0000D2FF0000D2FF0000D2FF0000 + D2FF6C6DD6FFB6B8D3FFC5C6D0FFC5C6D0FFA3A6C3FF4448C2FF0000D1FF0000 + D2FF0000D2FF0000D2FF0000D2FF0000D3FF0000DBFF0702E1E4200FD267381D + AE0A0000000000000000000000000000000000000000000000004926AC013419 + C6211507DAAA0000DFFE0000D7FF0000D2FF0000D2FF0000D2FF0000D3FF0000 + D3FF2A2DCDFF585ACFFF5C5ED1FF393BD2FF0608D7FF0606DAFF0606D9FF0303 + D6FF0000D3FF0000D2FF0000D5FF0100DEFD0B03DCCF2A15CE3F9B5C91010000 + 00000000000000000000000000000000000000000000000000003C20C20C1D0D + D1720702E0E80000DCFF0000D4FF0000D3FF0403D7FF0F0EDCFF1616E0FF9798 + EAFFECEDFAFFF4F4FDFFB0B2EEFF454BE8FF3838EDFF3A3AECFF3534E8FF1E1E + DDFF0101D4FF0000D8FF0401E2F31809D8993019B91F00000000000000000000 + 000000000000000000000000000000000000000000004326AF032D17C7321307 + DAB20201E0F80000D9FF0302D7FF1F1FE1FF3A3AECFF4545F0FFC3C4F8FFF7F8 + FEFFFBFBFEFFD2D5F4FF7981F1FF696AFAFF6E6FFBFF6E6EFAFF5252F1FF0B0C + DEFF0100E0FC0D03DFD02511CC515A34A7050000000000000000000000000000 + 000000000000000000000000000000000000000000004325BB0C2311CE5A0D04 + DDCF0100E0FD0707DEFF3939EBFF6262F8FF7172FBFFA3A5FCFFD7DAFDFFDEE0 + FAFFBAC0F5FF9197F9FF9093FEFF9597FFFF9597FFFF7274FCFF1517EBFF0902 + E0E41E0DD27B3D20B71500000000000000000000000000000000000000000000 + 0000000000000000000000000000000000005832A901361DC115200FCF680D04 + DCD30706E5FB3738EFFF6C6EFBFF8B8EFFFF9C9FFEFFB2B6FEFFB8BDFDFFAFB5 + FCFFADB1FEFFAEB2FFFFACAFFFFF9B9FFFFF6669FBFF1412E6EA200ED2833A1F + BD1F87509A010000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000004A2AAC01371FBD142613CD581509 + DAB71C1CE7F4494BF6FF7477FDFF9295FFFFA3A7FFFFABB1FFFFAEB3FFFFACB0 + FFFFA2A7FFFF8E93FEFF6C70F6FB3E3FE8CE2413D36F4122BD196F40A2010000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000004B2DAC014B2BB9082D17C52F2312 + D3751D18DCCB3032E9F84A4DF6FF5E60FBFF686CFCFF6A6EFDFF6367FAFF5558 + F1FB4547E6D73A36DE883324CD3E552FBD0A6C3DA50100000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000004F2DAE014026B50B3921 + C5202F1ACB492414C9821A12CE9E1E17D5BD201AD1A9241BCD852F1DCE583B22 + CB2B452ABE0E643EAE0200000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000005130 + AC032F1AB2083F2EB70C3A2EC20E402EBC0C3D27B3093B22B1046039A8010000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = InfoButtonClick + end + object EventiListButton: TSpeedButton + AnchorSideLeft.Control = avantiveloce + AnchorSideLeft.Side = asrBottom + AnchorSideTop.Control = DateEdit1 + AnchorSideBottom.Control = DateEdit1 + AnchorSideBottom.Side = asrBottom + Left = 839 + Height = 34 + Hint = 'Eventi Lista' + Top = 3 + Width = 35 + Anchors = [akTop, akLeft, akBottom] + BorderSpacing.Left = 5 + Color = 4933442 + Glyph.Data = { + 3A0F0000424D3A0F00000000000036000000280000001F0000001F0000000100 + 200000000000040F000064000000640000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003E3EFFFF0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003E3EFFFF0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFFFF000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFFFF000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003E3EFFFF00000000000000003E3E + FFFF3E3EFFFF3E3EFFFF00000000000000000000000000000000000000000000 + 0000000000003E3EFFFF00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003E3EFFFF0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003E3EFFFF0000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFFFF000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FFFF000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000003E3EFFFF00000000000000003E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF000000000000000000000000000000003E3EFFFF0000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00003E3EFFFF0000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFFFF000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000003E3E + FFFF000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003E3EFFFF00000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000000000000000000000000000003E3EFFFF0000 + 0000000000003E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF00000000000000003E3EFFFF0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000003E3EFFFF000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFFFF000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003E3EFFFF000000003E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF000000003E3EFFFF00000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003E3EFFFF000000003E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF0000 + 00003E3EFFFF0000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000003E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000003E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF0000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 00000000000000000000000000003E3EFFFF3E3EFFFF3E3EFFFF3E3EFFFF3E3E + FFFF3E3EFFFF3E3EFFFF3E3EFFFF000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 0000000000000000000000000000000000000000000000000000000000000000 + 000000000000000000000000000000000000000000000000000000000000 + } + ShowHint = True + ParentShowHint = False + OnClick = EventiListButtonClick + end + object DateEdit1: TDateEdit + AnchorSideLeft.Control = BarraStrumenti + AnchorSideLeft.Side = asrCenter + AnchorSideTop.Control = BarraStrumenti + AnchorSideTop.Side = asrCenter + Left = 576 + Height = 34 + Top = 3 + Width = 178 + CalendarDisplaySettings = [dsShowHeadings, dsShowDayNames] + DateOrder = doNone + DateFormat = 'dd-mm-yyyy' + ButtonWidth = 23 + NumGlyphs = 1 + Font.Height = -19 + Font.Name = 'Noto Sans' + MaxLength = 0 + ParentFont = False + TabOrder = 0 + Text = '09-03-2026' + OnChange = DateEdit1Change + end + end + object ContenitoreTop: TPanel + AnchorSideLeft.Control = Owner + AnchorSideTop.Control = Owner + AnchorSideRight.Control = Owner + AnchorSideRight.Side = asrBottom + AnchorSideBottom.Control = BarraStrumenti + Left = 0 + Height = 405 + Top = 0 + Width = 1330 + Anchors = [akTop, akLeft, akRight, akBottom] + BevelOuter = bvNone + Caption = 'ContenitoreTop' + ChildSizing.EnlargeHorizontal = crsHomogenousChildResize + ChildSizing.EnlargeVertical = crsScaleChilds + ChildSizing.ShrinkHorizontal = crsSameSize + ChildSizing.ShrinkVertical = crsHomogenousChildResize + ChildSizing.Layout = cclLeftToRightThenTopToBottom + ChildSizing.ControlsPerLine = 2 + ClientHeight = 405 + ClientWidth = 1330 + ParentBackground = False + TabOrder = 1 + inline LunaView1: TLunaView + Height = 405 + Width = 665 + ClientHeight = 405 + ClientWidth = 665 + ParentBackground = False + inherited Image1: TImage + AnchorSideLeft.Control = LunaView1 + AnchorSideTop.Control = LunaView1 + AnchorSideRight.Control = LunaView1 + Height = 262 + Width = 665 + end + inherited Label1: TLabel + AnchorSideLeft.Control = LunaView1 + AnchorSideRight.Control = LunaView1 + Top = 262 + Width = 665 + end + inherited GroupBox1: TGroupBox + AnchorSideLeft.Control = LunaView1 + AnchorSideRight.Control = LunaView1 + AnchorSideBottom.Control = LunaView1 + Top = 292 + Width = 653 + ClientHeight = 99 + ClientWidth = 647 + inherited Panel1: TPanel + Width = 647 + ClientWidth = 647 + inherited PicFase1: TImage + Width = 162 + end + inherited PicFase2: TImage + Left = 162 + Width = 162 + end + inherited PicFase3: TImage + Left = 324 + Width = 161 + end + inherited PicFase4: TImage + Left = 485 + Width = 162 + end + end + inherited Panel2: TPanel + Width = 647 + ClientWidth = 647 + inherited Fase1: TLabel + Width = 162 + end + inherited Fase2: TLabel + Left = 162 + Width = 162 + end + inherited Fase3: TLabel + Left = 324 + Width = 161 + end + inherited Fase4: TLabel + Left = 485 + Width = 162 + end + end + end + inherited SizeLuna: TLabel + AnchorSideTop.Control = LunaView1 + AnchorSideRight.Control = LunaView1 + Left = 629 + end + end + inline MeteoView1: TMeteoView + Left = 665 + Height = 405 + Width = 665 + ClientHeight = 405 + ClientWidth = 665 + ParentBackground = False + TabOrder = 1 + inherited CondizioniMeteoLabel: TLabel + Hint = 'Fonte Previsioni: OpenMeteo.com' + Width = 665 + end + inherited Label3: TLabel + AnchorSideLeft.Control = MeteoView1 + Left = 306 + end + inherited SpeedButton1: TSpeedButton + AnchorSideLeft.Control = MeteoView1 + AnchorSideTop.Control = MeteoView1 + AnchorSideRight.Control = MeteoView1 + AnchorSideBottom.Control = MeteoView1 + end + inherited EventiPanel: TPanel + AnchorSideLeft.Control = MeteoView1 + AnchorSideRight.Control = MeteoView1 + Height = 101 + Width = 665 + ClientHeight = 101 + ClientWidth = 665 + inherited Evento1Label: TLabel + Top = 4 + end + inherited Evento2Label: TLabel + Top = 36 + end + inherited Evento3Label: TLabel + Top = 69 + end + end + inherited TitoloLabel: TLabel + AnchorSideLeft.Control = MeteoView1 + AnchorSideRight.Control = MeteoView1 + Width = 665 + end + inherited Panel1: TPanel + AnchorSideLeft.Control = MeteoView1 + AnchorSideRight.Control = MeteoView1 + Width = 665 + ClientWidth = 665 + ParentBackground = False + inherited Image2: TImage + Width = 109 + end + inherited VisibilitaLabel: TLabel + Left = 109 + Width = 109 + end + inherited Image3: TImage + Left = 218 + Width = 109 + end + inherited CoperturaLabel: TLabel + Left = 327 + Width = 109 + end + inherited Image4: TImage + Left = 436 + Width = 109 + end + inherited VentoBassoLabel: TLabel + Left = 545 + Width = 120 + end + end + end + end + inline PianetiGraph1: TPianetiGraph + AnchorSideLeft.Control = Owner + AnchorSideTop.Control = BarraStrumenti + AnchorSideTop.Side = asrBottom + AnchorSideRight.Control = Owner + AnchorSideRight.Side = asrBottom + AnchorSideBottom.Control = Owner + AnchorSideBottom.Side = asrBottom + Height = 405 + Top = 445 + Width = 1326 + Anchors = [akTop, akLeft, akRight, akBottom] + BorderSpacing.Right = 4 + ClientHeight = 405 + ClientWidth = 1326 + ParentBackground = False + TabOrder = 2 + inherited PaintBox1: TPaintBox + AnchorSideLeft.Control = PianetiGraph1 + AnchorSideTop.Control = PianetiGraph1 + AnchorSideRight.Control = PianetiGraph1 + AnchorSideBottom.Control = PianetiGraph1 + Height = 375 + Width = 1316 + end + inherited Label1: TLabel + AnchorSideTop.Control = PianetiGraph1 + AnchorSideRight.Control = PianetiGraph1 + AnchorSideBottom.Control = PianetiGraph1 + Left = 1320 + Top = 404 + end + end + object MenuGlobale: TMainMenu + Left = 933 + Top = 408 + object MenuMac: TMenuItem + Caption = 'File' + Visible = False + object InfoMenu: TMenuItem + Caption = 'Informazioni StarStreet Forecast' + OnClick = InfoButtonClick + end + end + end +end diff --git a/unit1.pas b/unit1.pas new file mode 100644 index 0000000..7c1d516 --- /dev/null +++ b/unit1.pas @@ -0,0 +1,200 @@ +{ Un incredibile programma di ForeCast Astronomico + + Copyright (C) 2025 starstreet_sardegna + + This source is free software; you can redistribute it and/or modify it under + the terms of the GNU General Public License as published by the Free + Software Foundation; either version 3 of the License, or (at your option) + any later version. + + This code is distributed in the hope that it will be useful, but WITHOUT ANY + WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS + FOR A PARTICULAR PURPOSE. See the GNU General Public License for more + details. + + A copy of the GNU General Public License is available on the World Wide Web + at . You can also obtain it by writing + to the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor, + Boston, MA 02110-1335, USA. +} +unit Unit1; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, SysUtils, Forms, Controls, Graphics, Dialogs, ExtCtrls, StdCtrls, + EditBtn, Buttons, astronomy, framegrafico, frameluna, meteo_frame, + DateUtils, FileInfo, typinfo, ImpostazioniForm, settingsutils, info_form + ,LCLType, Menus, DateTimePicker, VisualizzaEventiForm; + +type + + { TForm1 } + + TForm1 = class(TForm) + DateEdit1: TDateEdit; + impostazionibutton: TSpeedButton; + ContenitoreTop: TPanel; + InfoButton: TSpeedButton; + EventiListButton: TSpeedButton; + LunaView1: TLunaView; + MenuMac: TMenuItem; + InfoMenu: TMenuItem; + MenuGlobale: TMainMenu; + MeteoView1: TMeteoView; + PianetiGraph1: TPianetiGraph; + tempooggi: TSpeedButton; + BarraStrumenti: TPanel; + avanti: TSpeedButton; + indietro: TSpeedButton; + indietroveloce: TSpeedButton; + avantiveloce: TSpeedButton; + procedure AggiungiClick(Sender: TObject); + procedure DateEdit1ButtonClick(Sender: TObject); + procedure DateEdit1Change(Sender: TObject); + procedure EventiListButtonClick(Sender: TObject); + procedure FormCreate(Sender: TObject); + procedure FormResize(Sender: TObject); + procedure InfoButtonClick(Sender: TObject); + procedure impostazionibuttonClick(Sender: TObject); + procedure SottraiClick(Sender: TObject); + procedure avantiClick(Sender: TObject); + procedure indietroClick(Sender: TObject); + procedure indietroveloceClick(Sender: TObject); + procedure avantiveloceClick(Sender: TObject); + procedure tempooggiClick(Sender: TObject); + + + + private + + public + + end; + + + + + + +var + Form1: TForm1; + tempo:TDateTime; + + OraSimulazione: integer; + httpsIsEnabled:boolean; + LinguaApp:string; + + impostazionidati:TImpostazioniDati; + +implementation + +{$R *.lfm} + +{ TForm1 } + + +procedure TForm1.FormCreate(Sender: TObject); +var + versione:TVersionQuad; //variabile per la versione del programma + versionnumber:string; + begin + {$ifdef darwin} + MenuMac.Visible:=True; + {$endif} + + + PianetiGraph1.colorform:=Form1.Color; //passa al frame il colore del form + Tempo:=EncodeDateTime(YearOf(Now), MonthOf(Now), DayOf(Now),0,0,0,0); + Impostazionidati:=settingsutils.LeggiImpostazioni; + Tempo:=DateEdit1.Date; + + Form1.tempooggiClick(nil); + FileInfo.GetProgramVersion(versione); + Form1.tempooggiClick(nil); + versionnumber:=FileInfo.VersionQuadToStr(versione); + Form1.Caption:='StarStreet Forecast App v'+versionnumber; + info_form.versionnumber:=versionnumber; //passo la variabile di versione a info_form + end; + + +procedure TForm1.FormResize(Sender: TObject); +begin +end; + +procedure TForm1.InfoButtonClick(Sender: TObject); +begin + info_form.Informazioni.ShowModal; +end; + +procedure TForm1.impostazionibuttonClick(Sender: TObject); +begin + ImpostazioniForm.Impostazioni.ShowModal; + impostazionidati:=ImpostazioniForm.impostazionidati; + + Form1.DateEdit1Change(nil); +end; + +procedure TForm1.SottraiClick(Sender: TObject); +begin + +end; + +procedure TForm1.avantiClick(Sender: TObject); +begin + DateEdit1.Date:=DateUtils.IncDay(Tempo,1); +end; + +procedure TForm1.indietroClick(Sender: TObject); +begin + DateEdit1.Date:=DateUtils.IncDay(Tempo,-1); +end; + +procedure TForm1.indietroveloceClick(Sender: TObject); +begin + DateEdit1.Date:=DateUtils.IncDay(Tempo,-5); +end; + +procedure TForm1.avantiveloceClick(Sender: TObject); +begin + DateEdit1.Date:=DateUtils.IncDay(Tempo,5); +end; + + +procedure TForm1.tempooggiClick(Sender: TObject); +begin + DateEdit1.Date:=EncodeDate(YearOf(Now), MonthOf(Now), DayOf(Now)); + +end; + +procedure TForm1.AggiungiClick(Sender: TObject); +begin + +end; + +procedure TForm1.DateEdit1ButtonClick(Sender: TObject); +begin + +end; + +procedure TForm1.DateEdit1Change(Sender: TObject); +begin + Tempo:=DateEdit1.Date; + PianetiGraph1.ImpostaTempoClick(nil, Tempo, impostazionidati.Latitudine,impostazionidati.Longitudine); + LunaView1.ImpostaDataClick(nil, Tempo, impostazionidati.OraSimulazione); + Form1.MeteoView1.OttieniMeteoClick(nil, Tempo, impostazionidati.httpsIsEnabled, impostazionidati.Latitudine, impostazionidati.Longitudine, impostazionidati.OraSimulazione); + +end; + +procedure TForm1.EventiListButtonClick(Sender: TObject); +begin + VisualizzaEventiForm.Form2.Show; +end; + + + + +end. +