Anonymní profil Trebor – Programujte.com

Dobry den, chcel by som opytať ci neviete o ake druhy aplikacii maju velke softverove spolocnosti zaujem a taktiez ci nemate nejaky napad na nejaku novu aplikaciu svojho druhu , ak viete ako to myslím. Vopred velká vďaka

Zasláno z mobilního telefonu.

diky

nazdar ..... neviete niekto nahodou ako možem 2 okna v tej istej aplikácii nastaviť tak že ak su obe spustene možem medzi nimi "prepínať", pretože teraz ak sa mi druhe spusti tak nemôžem kliknut na to prvé okno a to druhé začne "blikáť" ...vopred díky za všetky odpovede

nemyslím že by tam nebolo od začiatku ale keby zrazu zmizlo (myslim tým že by sa tam dostal kyslík alebo dačo iné

robím prezentáciu o jadrovej syntéze a ako poznam svojich spolužiakov 1. otázka bude že čo by sa stalo keby v spominanom fuznom reaktore nebolo vákum

ja si zapnem film a popri tom programujem .... ja si vždy zvolim ľahšiu cestu, ktorou to može byť naprogramovane čo najrychlejšie avšak nie príliš rýchlo aby bola vysledna aplikácia aj kvalitná ....ak už píšeš blbosti tak si to ulož a pokračuj na ďalší deň.

díky .... len som to chcel vediet keby sa ma to nahodou spýtali

Dakujeeem :)

čo myslíš "programovanie akosi nejde" ??

cawte dnes na matematike sme mali počítať nasledujuci priklad .... Koľko metrov štvorcových asfaltu prevalcuje parny valec, ktorého válec má polomer 1,8 metra a dlžku 3,5 metra ak sa valec otočí 50 krát..... viem že to vyzerá ako ľahký príklad ale mne ide o to že spolužiaci a aj učitel (čo som si myslel že je výborný matíkár) to počítali vzorcom 2Pi * r * (r+v) čo je vzorec na výpočet valce ale aj s podstavami a parny valec predsa nevalcuje aj s podstavami a ked som povedal že by sa podstavy mali odpočítať tak po mne začali kričať ako sprostí a začali sa mi vysmievať (ako vždy ked urobim, hoci malú chybu lebo som v matike prvý alebo druhy najlepší v matike). mne tento príklad vyšiel po zaokruhleni 1978,2 m2 a ostatným 2 995,56 m2 .....Kto mal pravdu v tvrdení že sa mali podstaví odrátať & komu vyšiel príklad správne ??

nazdar robím  projekt do školy a potrebujem vediet co by sa stalo keby sa nejaká látka na zemi (aspoň 10m kubických) zahriala na 100 milionov celzia. niekde som čítal že by vznikla supernova ale niesom si istý.... pls poradte .. vopred dakujem

tak teraz som trochu v šoku lebo som mysle že niečo čo má pár kíl možno pár desiatok kíl bude stát približne 100 - 200 tisíc eur :D :D ale inač díky za odpovede :)

neviete niekto kolko stoji satelit ? nemyslim satelit ako televizny prijmac ale taky na obeznej drahe a taky ako používajú mobilný operátori. aspoň približnú cenu (tisicky eur, 10tisice eur, ....) ... a kolko by stálo jeho vyslanie na obežnú dráhu? tiez chcem vediet len približnú cenu.....zaujima ma to lebo by som si chcel vypocitať aký ma zisk mobilný operátor.

díky

Nazdar ... potreboval by som vedieť čo znamená číslo dole naľavo od značky chemického prvku ´....vopred dík

teraz tomu uz rozumiem ked AMU je 1,660 5655.10 ^ (-27) .... díkes

tak potom neviem ze ci mám X1 vynásobit AMU alebo týmto -- 1,660 5655.10 ^ (-27)

tak ako mozes napisat ze m = X1*AMU a vzapeti ze to sa rovna X1*1,660 5655.10 ^ (-27) .......... z toho logicky vyplyva ze AMU sa rovna  1,660 5655.10 ^ (-27) ..... 

V akej hmotnostnej jednotke je výsledok ?

AMU (čiže 1,6605655 * 10 ^ (-27))  je avogradová konštanta nie ?

Takže som tam mal chybu iba v znamienku ?       

rovno mi napiste niekto nejaky vzorec kde iba dosadim lebo som sa v tom nejako stratil ........ zatial co tusim ze ako by to asi malo byt tak je toto

X1 = molárna hmostnosť atómu, ktorého hmotnosť chcem v gramoch

X1 / Avogradová Konštanta =  ? kg

1/12 hmotnosti C je približne 1,0009 ? (vypocital som to z atomovej hmotnosti uhlika ..... neviem ci som to mal práve z tejto hodnoty vypočítať) to by potom bolo ..... 1,00794 * 1,0009 alebo (1,00794 * 12,0107) / 12 ??

1,00794 / (1,661 * 10 na -27) = hmotnost v kg .....takto nejako ?

takze          1/12 hmotnosti C * 1,00794 = hmotnost H    ????

teraz si ma este viac zmiatol .. :)

tak ked je tepelna kapacita vodiku 14.304 kJ/(kgK) tak to znamená že na to aby sa kilogram vodíku ohrial o jeden kelvin tak potrebuje 14 304 Joulov ??

takze napr. vodík ktorý má molárnu hmotnosť  1,00794 g·mol  tak to znamená ze hmotnosť sa rovná 1,00794 násobku hmotnosti uhlíka ? ja to vobec ale vobec nerozumiem :)

vedeli by ste mi niekto vysvetliť ako sa počíta molárna hmotnosť a načo slúži ? prečo sa nemože udávať hmotnosť atomov či molekul napríklad v nano piko femto alebo attogramoch ? vopred dakujem

kolko tepla BY to priblizne bolo ?? ... nevyznám sa v tomtakze neviem ci ide o desiatky Joulov stovky, tisicky alebo niečo oveľa viac ...

takže vlastne pri tom náraze sa vytvorí teplo ?

pred nejakym casom som pozeral par info o nuklearnej fuzii a mam jednu otazku - ako z nej vlastne dostanu energiu tým že im ostane neutron (myslim nuklearnu fuziu deuterium-tricium). Bud sa pri tej reakcii ziskava nejaka energia alebo je zdrojom energie ten neutron ? a ak je to ten neutron ako z neho dostanu tú energiu ?

nie vlastne 2 421,6 J .... pomylil som sa 

cawte .. chcem si overit správnosť mojho výsledku ..... Teplo = Q = c*m*(t-t0) ...a chcem zistit kolko energie musí vodík s tepelnou mernou kapacitou 20,18 prijat ak jeho celková hmotnost je 1 kg a t-t0 = 120 Kelvinov ..... Mne to vyšlo 2,4216 Joulov ..... a kedze som vo fyzike len začiatočník tak som to radsej napisal sem.... vopred diky

No uz tomu trochu chapem a mam este Poslednu otazku ... Co je to vlastne elektricka kapacita (co sa meria vo faradoch)?

Zasláno z mobilního telefonu.

A ak maju vykon cca 20 MW ( udavam len ako priklad) tych 20 MW sa tam doda za sekundu ??

Zasláno z mobilního telefonu.

Myslel som ze kolko elektrickej energie dokaze elektraren "skladovat" a potom dodavat napriklad do domacnosti

Zasláno z mobilního telefonu.

Cakal som skor nieco ako 500 kWh...

Zasláno z mobilního telefonu.

Akurat som pozeral aku maju priblizne nove elektrarne kapacitu avsak na niekolkych strankach som nasiel ze kapacita je napr 50 MW ... MW je predsa jednotka vykonu... Mozno sa to nejako specialne pocita ale neviem .... Vysvetlite mi to prosim niekto??

Zasláno z mobilního telefonu.

este mam jednu otazku .... einstein myslel touto energiou v hmote energiu neustále sa pohybujúcich elektrónov ?? 

ok.. díky :D

teraz mi vyslo toto 1kg = 25 000 GWh. Myslite ze je to uz správne ?

aha .. dik ze si ma opravil ....

takze 1000 krat menej ... to znamená že 25 tisic kWh = 25 MWh ? .... a chcem sa ešte opytat ci nahodou nevies ci záleži aj na prvku, ktorý bude použitý ? či každý prvok obsahuje rovnaké množstvo energie ? podla mna zalezi na pocte elektronov ale neviem .....

akurat pre zaujimavost počítam kolko energie by malo byt v 1kg hmoty podla einsteinovej teorie (E=mc2). a neviem ci su moje vypocty spravne tak som si povedal ze tu by mi niekto mohol pomoct. Podla mojich vypoctvo by v 1kg malo byť 25 milionov kWh  alebo 90 bilionov J. takto som postupoval --- E = 1 000g * 90 000 000 000 (rychlost svetla na druhu) = 90 bilionov J - P = W/t --- P = 90 bilionov/3600s = 25 000 000 000 Wh = 25 000 000 kWh. Prosim opravte ma ak tam mam nieco zle....vopred diky

dík obom

staci link a aspon malé vysvetlenie ... prosííííím

ok ... díky

nazdar..... robim teraz aplikáciu ktora by mala vykonavat prikazy ktore zadam do textboxu napr "Left Right Up" a aj v tom poradi.... lenže ak zadam jeden prikaz dva krat napr na zaciatok a na koniec tak kedže používam tento kod 

TextBox1.Text = Replace(textBox1.Text, "Left", "")

vymaže mi prikaz Left aj ked je na zaciatku a aj na konci a chcem aby sa vymazal iba na zaciatku aby sa na konci ponechal prikaz left. Len neviem ako to docielim... Vopred díky za rady ...

ak som ta správne pochopil tak skus nieco z tohoto:

My.Application.Info.AssemblyName

My.Application.Info.ProductName

My.Application.Info.Title

Cavte.. potreboval by som vediet ako mozem programovo stlacit tlacidlo mysi nieco ako MouseButtons.Left.PerformClick() ..... vopred díky ...

uz by som to aj mal ale zapisuje mi to všetko do jedneho riadku ...

i1 = 0

Nevieš prečo mi tu  

.WriteStartElement(TreeView1.Nodes.Item(i1).Text)

vyhodí chybu Invalid Operation ???

vyhodí toto

 

MsgBox("Unknown Error i!")

.WriteStartElement(TreeView1.Nodes.Item(i).Text) 
pri tomto to ešte ide v pohode ale keď už prejde na Dim i2 As Integer = 0 tak vyhodí chybu

uz netreba uz som to vyriesil ale teraz mam uz konecne kód, ktorý už aj dačo ukladá ale ked mám prvý Node a ten má Child Node a ten má ešte jedno Child Node tak mi to do XML uloží iba

<Node0>
  <Node1 />

a ďalej nepokračuje ......

Kód:

Dim settings As New XmlWriterSettings()
        settings.Indent = True
        Dim XmlWrt As XmlWriter = XmlWriter.Create("C:\MyName.xml", settings)

        With XmlWrt
            .WriteStartDocument()

            .WriteComment("TreeView1Nodes")

            Dim i As Integer = 0
            Dim iend As Integer = TreeView1.Nodes.Count - 1
            Do Until i = iend
                Try
                    .WriteStartElement(TreeView1.Nodes.Item(i).Text)
                    Dim i2 As Integer = 0
                    Dim i2end As Integer = TreeView1.Nodes.Item(i).Nodes.Count - 1


                    Try
                        If TreeView1.Nodes.Item(i).Nodes.Item(0).IsVisible = True Then
                            Do Until i2 = i2end
                                Try
                                    .WriteStartElement(TreeView1.Nodes.Item(i).Nodes.Item(i2).Text)
                                    Dim i3 As Integer = 0
                                    Dim i3end As Integer = TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Count - 1


                                    Try
                                        If TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Item(0).IsVisible = True Then
                                            Do Until i3 = i3end
                                                Try
                                                    .WriteStartElement(TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Item(i3).Text)

                                                    i3 = i3 + 1
                                                Catch ex As Exception
                                                    MsgBox("i3 Error")
                                                    Exit Do
                                                End Try
                                            Loop
                                            .WriteEndElement()
                                        Else
                                            i2 = i2 + 1
                                        End If
                                    Catch ex As NullReferenceException
                                        i2 = i2 + 1
                                    Catch ex As Exception
                                        MsgBox("Unknown Error i2!")
                                        Exit Do
                                    End Try
                                Catch ex As Exception
                                    Exit Do
                                End Try
                            Loop
                            .WriteEndElement()
                        Else
                            i = i + 1
                        End If
                    Catch ex As NullReferenceException
                        i = i + 1
                    Catch ex As Exception
                        MsgBox("Unknown Error i!")
                        Exit Do
                    End Try
                Catch ex As Exception
                    Exit Do
                End Try
            Loop
            .WriteEndElement()

            .WriteEndDocument()

            .Flush()

            .Close()
        End With
        MessageBox.Show("XML file saved.")

neviem preco mi to neuklada ....

teraz to vyzerá asi takto 

Dim settings As New XmlWriterSettings()
        settings.Indent = True

        ' Initialize the XmlWriter.
        Dim XmlWrt As XmlWriter = XmlWriter.Create("MyName.xml", settings)

        With XmlWrt


            .WriteStartDocument()

            .WriteComment("TreeView1Nodes")



            Dim i As Integer = 0
            Dim iend As Integer = TreeView1.Nodes.Count - 1
            Do Until i = iend
                .WriteStartElement(TreeView1.Nodes.Item(i).Text)
                Dim i2 As Integer = 0
                Dim i2end As Integer = TreeView1.Nodes.Item(i).Nodes.Count - 1
                Do Until i2 = i2end
                    .WriteStartElement(TreeView1.Nodes.Item(i).Nodes.Item(i2).Text)
                    Dim i3 As Integer = 0
                    Dim i3end As Integer = TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Count - 1
                    Do Until i3 = i3end
                        .WriteStartElement(TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Item(i3).Text)
                        i3 = i3 + 1
                    Loop
                    Dim i3info As String = TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Item(i3end).Text
                    .WriteEndElement()
                    i2 = i2 + 1
                Loop
                Dim i2info As String = TreeView1.Nodes.Item(i).Nodes.Item(i2end).Text
                .WriteEndElement()
                i = i + 1
            Loop
            Dim iinfo As String = TreeView1.Nodes.Item(iend).Text
            .WriteEndElement()


            .WriteEndElement()  'A tu my vyhadzuje InvalidOperationException !!!!!!!!!!!!!!!!!!!!!

            .WriteEndDocument()

	    .Flush() 'Neviem či to má byť tu alebo úplne na začiatku !!!!!!!!!!!!!!!!!!!!!!
            .Close()


        End With


        MessageBox.Show("XML file saved.")

a nevies preco mi to aj tak nic nezapíše do súboru

aha ... díky

nazdar ........ mám takýto kód na ukladanie nodes do XML súboru 

       Dim settings As New XmlWriterSettings()
        settings.Indent = True

        ' Initialize the XmlWriter.
        Dim XmlWrt As XmlWriter = XmlWriter.Create("MyName.xml", settings)

        With XmlWrt


            .WriteStartDocument()

            .WriteComment("TreeView1Nodes")



            Dim i As Integer = 0
            Dim iend As Integer = TreeView1.Nodes.Count - 1
            Do Until i = iend
                .WriteStartElement(TreeView1.Nodes.Item(i).Text)
                Dim i2 As Integer = 0
                Dim i2end As Integer = TreeView1.Nodes.Item(i).Nodes.Count - 1
                Do Until i2 = i2end
                    .WriteStartElement(TreeView1.Nodes.Item(i).Nodes.Item(i2).Text)
                    Dim i3 As Integer = 0
                    Dim i3end As Integer = TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Count - 1
                    Do Until i3 = i3end
                        .WriteStartElement(TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Item(i3).Text)
                        i3 = i3 + 1
                    Loop
                    Dim i3info As String = TreeView1.Nodes.Item(i).Nodes.Item(i2).Nodes.Item(i3end).Text
                    .WriteEndElement(i3info)
                    i2 = i2 + 1
                Loop
                Dim i2info As String = TreeView1.Nodes.Item(i).Nodes.Item(i2end).Text
                .WriteEndElement(i2info)
                i = i + 1
            Loop
            Dim iinfo As String = TreeView1.Nodes.Item(iend).Text
            .WriteEndElement(iinfo)


            .WriteEndElement()
            .WriteEndDocument()
            .Close()


        End With


        MessageBox.Show("XML file saved.")

ale pri .WriteEndElement(iinfo) ; .WriteEndElement(i2info) ; WriteEndElement(i3info) mi vyhodí túto chybu 

"Too many arguments to 'Public MustOverride Sub WriteEndElement()'."

Poradte pls ..... Vopred díky

a ktomu odlesku .... stačí si spraviť šedo-čierny gradient a po okrajoch do stratena

Stačí keď si vytvoriš dobrý obrázok (najlepšie gradient) a potom ho dáš na tlačítko pomocou Button.BackgroundImage a upravíš Button.BackgroundImageLayout na Stretch. Ale nevyzerá to zle aj keď si nastavíš Button.BackColor na nejakú zaujímavú farbu.

díky ..

Cavte

Potreboval by som nejaký link na File sample ako uložit nodes s treeview do XML (samozrejme aj s ich child nodes). Staci ked napisete link na návod podla ktorého ste sa vi riadili ked ste robili nieco podobne prvý krat respektive link na nejaký file sample kde je to už hotové. Vopred dakujem.

skúšal som niečo takéto no v poslednom riadku mi vyhodí chybu 

Dim node As TreeNode
        Dim node2 As TreeNode
        node = TreeView1.SelectedNode
        node2 = TreeView1.SelectedNode.NextVisibleNode
        TreeView1.SelectedNode = node2
        TreeView1.SelectedNode.NextVisibleNode = node

potreboval by som aby sa ten node presuval aj s "child" ....... staci mi link